literaturas
30.10.2021 13:21

Найти сумму всех целых чисел от a до b.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Wolf2002
11.06.2020 04:16
Uses crt; 
var a,b,s,i:integer; 

begin 
clrscr; 
readln(a); 
readln(b); 
for i:=a to b do 
begin 
s:=s+i; 
end; 
writeln(s); 
readln; 
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота