Регистрация
glamur9068
12.09.2021 07:29
Информатика
Есть ответ 👍

Дан двумерный массив a[n,m]. определить произведение квадратов всех элементов массива. напишите полностью .

139
390
Посмотреть ответы 2

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

даня7345985
даня7345985
4,4(16 оценок)
Var a: array[1..100,1..100]of integer; i,j,n,m: integer; begin  readln(n,m);   randomize;   for i: =1 to n do  for j: =1 to m do begin  a[i,j]: =random(100); write(a[i,j],' ');   a[i,j]: =sqr(a[i,j]); write(a[i,j],' ');   end;   readln; end.
lasyaaa
lasyaaa
4,4(91 оценок)
Var  ch: char; begin write('введите символ: '); read(ch); writeln('предыдущий символ: ', pred(ch), ' | ', 'следующий символ: ', succ(ch)); end.

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