1. Информатика
  2. Напишите программу, которая

Напишите программу, которая вводит натуральное число n и нахо дит сумму всех натуральных чисел от 1 до n. используй цикл с предусловием

danilp7 danilp7    2   01.09.2019 00:00    2

Ответы
ЕсенжоловаЛяззат ЕсенжоловаЛяззат  03.08.2020 13:21
Program z1;
var a,n,i,sum:integer;
Begin
sum:=0;
read(n);
for i:=1 to n do
begin
read(a);
sum:=sum+a;
end;
writeln(sum);
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
dvydenko dvydenko  13.04.2020 11:47
Дан целочисленный одномерный массив из 20 элементов, заданных с датчика слу­чайных чисел (randomize) После обработки массива программа выводит на экран номера элементов, которые...
gfff2 gfff2  13.04.2020 11:47
Анимация деген соз кай Тилден енген....
krav4enkom krav4enkom  13.04.2020 11:47
Варианты ответов: 1.program zadaca; var a: integer; begin writeln( Введи число a ); readln(a); if a =0 then if a=0 then a:=11 else a:=a+1 else a:=a-3; end. 2. program cislo;...
IrishkaLis IrishkaLis  13.04.2020 11:47
1)Какие вы можете назвать пути размещения заднего фоны игры?2)Какая команда используется для размещения одного изображения поверх другого?​...
mrsuper773outlookcom mrsuper773outlookcom  19.04.2021 17:41
Нужна ПРОФИ 1) На вход алгоритма подается 125 целых чисел. Необходимо написать программу, которая будет выводить на экран число, которое в 4 раза больше среднего арифметического...
Amin1402 Amin1402  19.04.2021 17:41
Текст Нулевой Дата Сокращённый ​...
NICKMASTER121 NICKMASTER121  08.05.2020 20:17
Напечатайте в столбик следующие числа...
Russland2000 Russland2000  08.05.2020 20:17
Конспект на тему Лінійні алгоритми пліз​...
gsajhja gsajhja  01.03.2020 20:19
Phyton*программист написал программу с циклом:count=owhile count 20: ( отступ) print( привет )( отступ) count += 1как измениться программа еслиа) заменить условие на cout !=...
Малефисента1111111 Малефисента1111111  05.09.2019 19:00
_guten tag. _ guten tag. _ wie heissen sie bitte? _ petra neu. _ und wo wohnen sie? _ in koln, altstrasse 2. _ hier bitte! nummer 5. _ danke. _ auf wiedersehen. _ auf wiedersehen...

Популярные вопросы