Регистрация
yulia14683
12.03.2023 08:52
Информатика
Есть ответ 👍

Вычислите значение переменной S:
x:=2;y:=3; if x A)1; B)2; C)3; D)4

242
375
Посмотреть ответы 1

Ответы на вопрос:

dkogotyzeva
dkogotyzeva
4,6(36 оценок)

program sashka9595; uses crt; const n=20; var  a: array[1..n] of integer;   max,i,j,k: integer; begin  writeln('*** alphaues is ***');   writeln('***                  ok                        ***');   randomize;   writeln('массив: ');   for i: =1 to n do      begin          a[i]: =random(100)-50;           write(a[i],'  ');       end;   for i: =1 to 3 do      begin          k: =i;           max: =a[i];           for j: =i+1 to n do              if a[j]> max then                  begin                      max: =a[j];                       k: =j;                   end;           a[k]: =a[i];           a[i]: =max;       end;   writeln();   writeln('три наибольших элемента массива: ');   for i: =1 to 3 do      writeln(i,'-й: ',a[i]); end.

Популярно: Информатика