Регистрация
ИванГо228
25.04.2023 21:25
Информатика
Есть ответ 👍

У вас запланирована школьная экскурсия в музей, в который вы давно хотите попасть, но не помните точную дату вашего посещения. Как можно узнать дату и время с электронного дневника?

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

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

mcanya1
mcanya1
4,8(58 оценок)

var

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

  i: integer;

  s1,s2: real;

begin

  randomize;

  for i: =1 to 10 do begin

    a[i]: =random(12)-1;

    s1: =s1+a[i];  

    b[i]: =random(9)+1;  

    s2: =s2+b[i];  

    write (a[i],' ');

  end;

  writeln;

  for i: =1 to 10 do write (b[i],' ');

  writeln;

  s1: =s1/10;

  s2: =s2/10;

  writeln ('s1 = ',s1);

  writeln ('s2 = ',s2);  

  if s1> s2 then writeln ('s1> s2') else

  if s1< s2 then writeln ('s1< s2') else writeln ('s1=s2');

  readln;

end.

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