Регистрация
Войти
Стать экспертом Правила
Информатика

Используя цикл For вычислить сумму 7-ми произвольных чисел, введенных с клавиатуры.Составить для паскаль.Пожалуйста посчитайте пожалуйста.Буду очень благодарна

ОТВЕТЫ
Program DZ;
var i: longint; 
  x,s:real;
begin
  s:=0;
  for i:=1 to 7 do
    begin
       read (x);
       s:=s+x;
    end;
  write (s);
end.
445
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам