tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составить программу вычисления
Составить программу вычисления суммы натуральных чисел, начиная с 5 до заданного числа x (x> 5)
SaLmOn4663
3 18.09.2019 16:50
2
Ответы
Елена5763
08.10.2020 00:24
Var
sum: integer := 0;
num: integer;
begin
write('Введите число n: ');
read(num);
for var k := 5 to num do sum += k;
write('Сумма: ',sum);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
sucker046
15.03.2019 22:22
28 сколько бит нужно для кодировки четырех цветного изображения (ответ записать цифрой )...
leiylacan1
15.03.2019 22:17
На завтра нужно! решается моя четвертная оценка!...
dimabarabanov
03.10.2019 06:10
Решите ! turbopascal сформировать и вывести на экран массив,элементы которого заданы датчиком случайных чисел на интервале [-45 , 98](размер произвольный)...
akhmedkhatataev95
03.10.2019 06:00
Дан массив, состоящий из 14 элементов. массив заполняется пользователем после запуска программы. составьте программу нахождения количества элементов 15 в массиве...
хитрыйкот
18.04.2019 18:13
Решить а) расставьте строки программы в правильном порядке. p : = x * y * k; write( введите три целых числа через пробел ); end. var х,у,k,z,p: integer; z : = x +...
egorywka
16.07.2019 15:00
Расстояние от пристани а до пристани в катер проплыл за 6 часов, а от пристани в до пристани а за 7,5 часов. скорость течения реки 2 км/ч. найдите собственную скорость...
viper998
16.07.2019 15:00
Я3 мешках содержится 1,97 ц муки.массы ивет я 1 и 2 мешках одинаковы.но масса ивет я 3 мешка на 0,11 ц больше чем в первом.сколько ивет я каждом из мешков?...
Kristinapermya
16.07.2019 15:00
Два поезда движутся в противоположных направлениях от станции от станции а первый поезд находится на расстоянии 70,5 километров а второй на расстоянии 56,75 километров...
Максим555111
16.07.2019 15:00
Диалог на тему мой класс на языке, по 4 вопроса и 4 ответа) !...
a12efefsd
16.07.2019 15:00
Какого происхождение титул регина ругорум ?...
Популярные вопросы
Назовите все виды грибов своей местности...
3
Переведите численный масштаб-в именованный. а)1: 4.000,1: 700....
3
площадь поверхности прямоугольного параллелепипеда, если его измерения...
3
Почему при опыте короткого замыкания к первичной обмотке подводиться...
1
Синтаксический разбор предложения и схема. (желательно написать...
1
Расставить знаки препинания с моего окна на праздниках я могу увидеть...
3
Выпиши слова с суффиксом ок прыжок локоток кружок срок сапожок...
2
Кем был петр 1 во время боевых действий на азове?...
2
Напишите рецепт блюдо из яица, соли, масла...
1
Лыжник км, что составило 3/7 всего пути.сколько километров ему...
1
sum: integer := 0;
num: integer;
begin
write('Введите число n: ');
read(num);
for var k := 5 to num do sum += k;
write('Сумма: ',sum);
end.