Регистрация
Murv847
19.06.2020 08:02
Информатика
Есть ответ 👍

по информатике (11 класс, ДПА)

214
317
Посмотреть ответы 1

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

sdoleg2011
sdoleg2011
4,4(62 оценок)

program yoelzelten; const n=10; var  ma: array[1..n] of real;   mb: array[1..n] of real;   i: integer; begin  randomize;   writeln('*************************************');   writeln('***    массив а    **      массив в    ***');   for i: =1 to 10 do      begin          ma[i]: =random(21)-10;           if ma[i]< 0 then mb[i] : = ma[i] * 2              else mb[i] : = ma[i] * 3;           writeln('***',ma[i]: 8: 0,'          **    ',mb[i]: 8: 0,'      ***');       end;   writeln('*************************************'); end.

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