Есть ответ 👍

Таблица эксель, сделать и прислать файлом .xls

179
398
Посмотреть ответы 1

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


Var       arr: array[1..10] of integer;       i: integer; begin       randomize;       for i: =1 to 10 do       begin               arr[i] : = random(100);               write(arr[i] + #9);       end;             writeln();             for i: =1 to 10 do       begin                 if arr[i] mod 2 = 0 then                 begin                       arr[i] : = 1               end;               write(arr[i] + #9);       end; end.

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