Эссе на тему "Почему важны диалоги в Скреч? "​

ответ: Delphi/Pascal

program Matrix24;

var

 a:array [1..10,1..10] of integer;

 Max,M, N, i, j:Integer;

 

begin

Write('N: ');

Readln(N);

Write('M: ');

Readln(M);

 

 

for  i:=1 to M do

 begin

  writeln(i,': ');

  for j:=1 to N do

   begin

    Write(j,' : ');

    Read(a[i,j]);

   end;

 end;

 

for  j:=1 to N do

 begin

  writeln(j,': ');

  Max:=a[1,j];

  for i:=2 to M do

   begin

    if a[i,j]>Max then Max:=a[i,j];

   end;

  writeln('Масимальный элемент:',Max);

 end;

end

program Matrix24;

var

 a:array [1..10,1..10] of integer;

 Max,M, N, i, j:Integer;

 

begin

Write('N: ');

Readln(N);

Write('M: ');

Readln(M);

 

 

for  i:=1 to M do

 begin

  writeln(i,': ');

  for j:=1 to N do

   begin

    Write(j,' : ');

    Read(a[i,j]);

   end;

 end;

 

for  j:=1 to N do

 begin

  writeln(j,': ');

  Max:=a[1,j];

  for i:=2 to M do

   begin

    if a[i,j]>Max then Max:=a[i,j];

   end;

  writeln('Масимальный элемент:',Max);

 end;

end.

1) Считаем среднее значение от 100 тетрадей на пятерых человек:
100:5=40 (по 40 тетрадей приходится на каждого)
2) Предполагаем, что значение Коли верно, тогда:
Вася: 52-20=32
Юра: 43-32=11
Саша: 34-11=23
Серёжа: 30-23=7
3) Теперь считаем общее колличество получившихся тетрадей:
20+32+11+23+7=93
Напоминаю, что должно получится 100, следовательно 7 тетрадей не хватает. Именно их мы и должны прибавить. Осталось только понять куда.
4) Начнём с начала. Прибавляем эти 7 тетрадей к Коле:
20+7=27 - Коля. Тогда:
Чтобы узнать, сколько тетрадей у Васи, вычтем из 52(общее кол-во тетрадей Коли и Васи) кол-во тетрадей Коли:
52-27=25 - Вася.
Так же считаем и остальных. Получаем:
Юра: 43-25=18 тетрадей
Саша: 34-18= 16 тетрадей
Серёжа: 30- 16= 14 тетрадей

ОТВЕТ: Коля - 27, Вася - 25, Юра - 18, Саша - 16, Серёжа - 14 тетрадей =)