Написать программу которая складывает числа от 4 до 100

Написать программку которая складывает числа от 4 до 100

Задать свой вопрос
1 ответ
Var i,sum:integer;
Begin
for i:=4 to 100 do
  begin 
      sum:=sum+i; 
      writeln('Summa',i,'=',sum);
  end;
end.
Светлана Шлянкина
Принципная ошибка. Нет исходного присваивания переменной sum. Эталон языка Pascal НЕ ОПРЕДЕЛЯЕТ, какое значение имеет неинициализированная переменная.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт