Регистрация
света9710
22.03.2021 21:09
Информатика
Есть ответ 👍

Решите тест по информатике...​

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

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

aylincik930
aylincik930
4,8(7 оценок)

1) var a,b,c,d,e,f,g: real;

    begin

      readln(a,b,c,d,e,f,g);

      writeln(a*b*c*d*e*f*g);

    end.

2) var a,i,s: integer;

    begin

      s: =1;

      a: =0;

      for i: =1 to 7 do begin

        a: =a+1;

        s: =a*s;

                              end;

    writeln(s);

  end.

вот программы. по ним составь блок схемы. 

     

     

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