Есть ответ 👍

. Выберите оператора сравнения на языке RobotC. Заранее .

133
338
Посмотреть ответы 1

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


Var a: array[1..7] of integer; i: integer; n1: real; begin writeln('введите 7 целых чисел'); for i: =1 to 7 do begin repeat read(n1); if (n1< > round(n1)) then  writeln('необходимо целое число'); until (n1=round(n1)); a[i]: =round(n1); end; for i: =1 to 7 do begin if a[i]< 0 then a[i]: =-1; end; writeln('полученный массив: '); for i: =1 to 7 do write(a[i]: 5); writeln(''); end.

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