tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Найти сумму первых n натуральных
Найти сумму первых n натуральных чисел где n задается с клавиатурой. .
evasuperpuper123
3 13.09.2019 08:30
0
Ответы
masaberegovenko
01.09.2020 13:24
Program suma;
Var n, sum, i:integer;
begin
read(n);
for i:=1 to n do sum:=sum+i;
write(sum);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
kazinka9
05.02.2021 11:22
6. Запишите на языке Python арифметическое выражение....
rama13534
05.02.2021 11:21
Составте программу для задание cif18 в pascalABC. NET. ...
crybaby1916
05.02.2021 11:18
В одномерном массиве B, состоящем из 10 произвольных элементов найти кол-во чётных элементов( В Паскале)...
530Саша1111
05.08.2019 13:20
Загадай любое число a и любое четное б...
edeeeeeeffer
21.04.2021 10:15
Дуже потрібна ваша до , велика винагорода за завдання, на перед дякую! Очень нужна ваша сделайте, большая награда за задание) За рание ! ...
BlackPorshe2356
21.04.2021 10:14
Print(myColor[0]) polotno.create_restangle(200,100, 250, 300, fill=myColor[1],outline= orange ,width=3)polotno.create_oval(50,50, 100, 100)myWindow.mainloop()Кусочек...
ed77714
22.07.2019 12:00
Диапазон ячеек b3 f8 cколько содержить ячеек...
austimenko291
22.07.2019 12:00
Определите минимальный обьем видеопамяти для экрана с разрешением 800 х960 и палитрой 64 цвета...
Diankamilanka2005
12.08.2019 04:00
Объем сообщения содержащего 2048 символов составил 1/512 часть мегабайта каков размер алфавита с которого записано сообщение?...
мяеенри
12.08.2019 04:00
Составьте программу, которая формирует массив из 7 случайных целых чисел из [-20,20] и выводит модуль отрицательных элементов, а положительные оставляет без изменений....
Популярные вопросы
3примера которые иллюстрируют политику государства направленную...
2
Найдите массу воды, полученной из кислорода и 180г водорода...
2
Найдите дробь от велечины 1) 0,5 от 7кг...
3
Втреугольника abc отмечены середины е и f сторон св и ва соответственно....
3
Из города а в город б выехал пассажирский поезд, скорость поезда...
3
Реши уровнение: 20- x: 17=3. только напишите по действиям!...
1
4.в одной пачке тетрадей в два раза больше, чем в другой. когда...
3
(x+1)^2+√x+1=0 .розв*яжіть рівняння...
1
Мини сочинение на тему : о чём меня заставил задуматься рассказ...
2
:проекты объединений и кем они были предложены?...
2
Var n, sum, i:integer;
begin
read(n);
for i:=1 to n do sum:=sum+i;
write(sum);
end.