Дана программа:
const n=5;

const a: array[1..n] of integer=(1,2,6,4,5);

var i, max1, max2: integer;

begin

max1:=a[1];

max2:=a[2];

for i:=2 to n do

if a[i]>max1

then begin max2:=max1; max1:=a[i]; end

else if a[i]>max2 then max2:=a[i];

writeln(max1, max2);

end.

Что будет выведено на экран в результате выполнения этой программы?

389 365 402 201

триста восемьдесят девять миллиардов триста шестьдесят пять миллионов четыреста две тысячи двести один

(телефон) поверчу волшебный круг,- и меня услышит друг.  (стол) под крышей-четыре ножки, над крышей-суп да ложки. хоть по размеру и мала, информацию хранит она. знаем все устройство это  )

3*3: (3*3)=1

(3*3-3): 3=2

3*3-(3+3)=3

(3*3+3): 3=4

(3+3): 3+3=5

(3+3-3)+3=6

(3: 3+3)+3=7

3*3-(3: 3)=8

3*3-(3-3)=9

3*3+3: 3=10

и какая вероятность что пользователь не

program i_guess_number; uses crt; var changes: array [1..2,1..10] of integer; i,op,n: integer; s: string; res: real; begin      randomize;       writeln("загадайте число");       n : = 0;       repeat            n : = n+1;             i : = random(10);             op : = random(4);                         case op of                  1: s : = "прибавте ";                   2: s : = "отнимите ";                   3: s : = "умножте на ";                   else s : = "поделите на ";             end;                         writeln(s, i);             changes[1,n] : = op; {запоминаем действия}            changes[2,n] : = i;       until n = 10;             writeln("что вышло? ");       readln(res);             for i : = n downto 1 do { производим обратные действия }      begin            case changes[1,i] of                  1: res : = res - changes[2,i];                   2: res : = res + changes[2,i];                   3: res : = res / changes[2,i];                   else res : = res * changes[2,i];             end;       end;                   writeln("вы загодали ",res); end.