Регистрация
1POMOGUTE1
16.03.2021 15:31
Информатика
Есть ответ 👍

Смета на приобретение концелярских товаров

249
458
Посмотреть ответы 1

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

valereiagorohov1
valereiagorohov1
4,4(44 оценок)

var a: array[1..10] of integer; b: array[1..10] of integer; c: array[1..10] of integer; i: integer; begincls; for i: =1 to 10 do  begin  a[i]: =random(50);   write(a[i]: 4);   end; writeln; for i: =1 to 10 do  begin  b[i]: =random(50);   write(b[i]: 4);   end; writeln; for i: =1 to 10 do  begin  if a[i]< b[i] then c[i]: =a[i] else c[i]: =b[i];   write(c[i]: 4);   end; end.

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