Напишите программу,которая увеличивает заданное число в 100 раз,если ого меньше 20,и уменьшает в 10 раз в противном случае

260

475

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

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

annasafaryan87

Информатика

4,5(39 оценок)

Program gt; var a: array[1..100,1..100]of integer; n,i,max,,j: integer; begin read(n); for i: =1 to n do for j: =1 to n do a[i,j]: =random(100)-50; max: =a[1,1]; for i: =1 to n do begin for j: =1 to n do begin if(a[i,j]> max)then max: =a[i,j]; end; end; for i: =1 to n do begin for j: =1 to n do begin if(a[i,j]=max)then writeln(i, ' ',j); end; end; end.