Регистрация
мидина5
10.06.2023 16:01
Информатика
Есть ответ 👍

70 ! информатика 8 класс! система кумир. хотя бы 1ю , если и с 2мя последними, буду безумно ! заранее !

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

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

Sashok1252535
Sashok1252535
4,4(16 оценок)

var

  a: array [1..16] of real;

  t: array [1..4,1..4] of integer;

  i,j,k: byte;

begin

  randomize;

  for i: =1 to 4 do begin

    for j: =1 to 4 do begin

    t[i,j]: =random(9)+1;

    write (t[i,j]: 4);

    end;

    writeln;

  end;

  k: =1;  

  for i: =1 to 4 do

    for j: =1 to 4 do begin

    a[k]: =t[i,j]*0.25;

    write (a[k],' ');  

    k: =k+1;  

    end;

  readln;

end.

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