Что будет на экране после выполнения программы, если переменная b равна: а)7 б)25 program a; var b,c: - id140921320201019 от Gavka1 19.10.2020 18:55

Question

Информатика: Что будет на экране после выполнения программы, если переменная b равна: а)7 б)25 program a; var b,c: integer; begin readln(b); if b 25 then c: =b*b else c: =b mod 10; writeln ( c= ,c) end.

Gavka1 · Accepted Answer

Const   n = 11; var   x: array[1..n] of integer;   i, k, d, s: integer; begin   Randomize;   Writeln( Элементы массива );   k := 0; s := 0;   for i := 1 to n do   begin     d := Random(11) - 5;     Write(d:3);     if (i mod 2) = 0 then begin { четное место }       if d = 1 then Inc(k);       x[i] := d     end     else begin       if d 0 then s := s + d;       x[i] := sqr(d)     end   end;   Writeln;   Writeln( Результирующий массив );   for i := 1 to n do Write(x[i]:3);   Writeln;   Writeln( Количество...

Что будет на экране после выполнения программы, если переменная b равна: а)7 б)25 program a; var b,c: integer; begin readln(b); if b< 25 then c: =b*b else c: =b mod 10; writeln ('c=' ,c) end.

MOGZ ответил