Botan0011
28.06.2021 08:22

Начертите блок-схему и запишите программный код в visual studio windows forms Я тут что-то написал, но у меня ответы не сходятся, найдите ошибку.

Private void button1_Click(object sender, EventArgs e)
{
double x = double.Parse(textBox1.Text);
double y = double.Parse(textBox2.Text);
double z = double.Parse(textBox3.Text);

textBox4.Text = "Результаты работы программы" + " :) " +
Environment.NewLine;
textBox4.Text += "При X = " + textBox1.Text +
Environment.NewLine;
textBox4.Text += "При Y = " + textBox2.Text +
Environment.NewLine;
textBox4.Text += "При Z = " + textBox3.Text +
Environment.NewLine;

double a = Math.Pow(y, x + 1);
double b = Math.Pow(Math.Abs(y - 2), 1 / 3) + 3;
double c = a / b;
double d = x + y / 2;
double f = 2 * Math.Abs(x + y);
double n = d / f;
double h = Math.Pow(x + 1, -1 / Math.Sin(z));
double i = n * h;
double g = c + i;

textBox4.Text += "g = " + g.ToString() +
Environment.NewLine;


Начертите блок-схему и запишите программный код в visual studio windows forms Я тут что-то написал,

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
е7гроошишгини
12.12.2022 07:28
Для того, чтобы узнать, не встречалось ли 20-е число раньше, надо помнить, какие числа были до этого. Так что без массива с меньшим размером, чем 19, не обойтись (на самом деле это так, только если в каждом элементе массива хранить только одно число. Но мы так и будем делать). 

Алгоритм для решения задачи выберем простой: записываем все предыдущие числа в массив и для каждого следующего числа проходим по массиву.

var
  a: array[1..19] of byte;
  i, j, t: byte;

begin
  for i := 1 to 20 do
  begin
    read(t);
    if i < 20 then a[i] := t;
    for j := 1 to i - 1 do
      if a[j] = t then
        t := 0;
    if t > 0 then write(t, ' ');
  end;
end.

Пример ввода:
1 1 2 2 3 3 4 4 5 5 6 6 7 7 8 8 9 9 10 10

Пример вывода:
1 2 3 4 5 6 7 8 9 10
0,0(0 оценок)
Ответ:
есенгельды
08.11.2022 08:34
Пусть ученик неуспевающий, если сумма его отметок меньше 2+2+3+3=10.

var
  count_losers, sum, current_sum, mark, i, j, n: integer;

begin
  read(n);
  count_losers := 0;
  for i := 1 to n do
  begin
    current_sum := 0;
    for j := 1 to 4 do
    begin
      read(mark);
      current_sum := current_sum + mark;
    end;
    if current_sum < 10 then
      inc(count_losers);
    sum := sum + current_sum;
  end;
  writeln('Неуспевающих учеников: ', count_losers);
  writeln('Средняя сумма четырёх отметок: ', sum / n);
  writeln('Средняя отметка: ', sum / 4 / n);
end.

Пример ввода:
4
2 2 2 5
2 2 5 2
2 5 2 2
3 2 2 2

Пример вывода:
Неуспевающих учеников: 1
Средняя сумма четырёх отметок: 10.5
Средняя отметка: 2.625
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота