• Предмет: Информатика
  • Автор: LizaVolkova5
  • Вопрос задан 10 лет назад
< >

Пожаалуйста,Geany . 
Найти сумму целых чисел от 100 до 500: сумму от a до 500 a<= 500

Ответы

Ответ дал: mati99ru
0
var sum,i:integer;beginsum:=0;for i:=100 to 500 dosum:=sum+i;writeln (i);end.
Похожие вопросы
Русский язык
2 года назад
Вставьте пропущенные буквы, графически объясните выбор орфограмм Расст...лать, проб...рался, разб...ру, соб...раться, раст...рать, выд...рать, переб...рать, забл...стел, разд...рает, бл..снуть,
Русский язык
2 года назад
С незапамятных времен человек употребляет в пищу, дикорастущие плоды и ягоды, обладающие своеобразным, неповторимым ароматом и вкусом. Клюква, брусника, черника, малина, земляника, калина, другие
Физика
7 лет назад
лабороторная 4...8класс помогите заполнить таблицу.Выручаите
Математика
7 лет назад
сколько взвешиваний на чашечных весах потребуется, чтобы определить одну фальшивую монету среди семи? (известно что фальшивая монета легче настоящей)
Алгебра
10 лет назад
Помогите решить уравнение- 3 штуки очень надо, спасибо :) 1-методом группировки (первый знак минус,а не умножить) 2-методом Пьезо (первый знак минус,а не умножить) 3-методом группировки
Математика
10 лет назад
Напиши а)все четные числа больше 10 но меньше 21 б)все нечетные числа больше 12 но меньше 23  
Обществознание
10 лет назад
если уровень пособия по безработице будет выше чем МРОТ и прожиточный минимум, какие последствия для социально-экономической жизни общества это будет иметь. Какие положительные последствия в такой
Геометрия
10 лет назад
Найдите наименьший острый угол прямоугольного треугольника , если известно , что медиана , выходящая из вершины прямого угла , делит этот угол в отношении 2:1