1. Информатика
  2. Вычислить сложения чисел

Вычислить сложения чисел от 1 до 50 используя различные варианты цикла

димкаа2 димкаа2    3   29.09.2019 12:20    2

Ответы
rororo5209 rororo5209  09.10.2020 02:45

На каком языке программирования надо?Pascal?

Если да,то

var summ,i:integer;

begin

for i:=1 to 50 do

begin

 summ+=i;

end;

WriteLn(summ);

end.

Либо

var summ,i:integer;

begin

i:=1;

while i<=50 do

begin

 summ+=i;

 i+=1;

end;

WriteLn(summ);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
timca2014 timca2014  04.02.2021 21:42
Номер 34. Сделать Схему и Таблицу...
kulanforever kulanforever  04.02.2021 21:37
Що надають Інформаційні матеріали і ПРИКЛАДИ сайтів...
lllllkkkkkkk lllllkkkkkkk  04.02.2021 21:36
мне нужен МЕЧ в программе Кумир...
Angelina937 Angelina937  04.02.2021 21:35
Какие продукты лучше употреблять на ужин? ​...
VaDerSs VaDerSs  04.02.2021 21:34
Решите Информатика 8 класс) a= 8; b= a - 6 ; b= 3*a - b*2 ; c= -a*2 + 4 * b; b= -a*2 + b/4-c; a= b/5 - a*4; c= c/32 - b - a*3; a= c - b; c= b/5 - a;...
NiVan1337 NiVan1337  04.02.2021 21:32
почему недостаточно просто вымыть фрукты в воде? какую дополнительную обработку необходимо провести?​...
MishaDunaev MishaDunaev  04.02.2021 21:30
Найти количество информации, которое занимает видеоролик, размером картинки 800*600 пикселей, с частотой кадров 15 кадров/сек, длительностью 1 минута, в цветовой...
andreyylysp08r6o andreyylysp08r6o  04.02.2021 21:27
Напишите программу НА ПИТОНЕ, которая находит количество чисел, кратных 3, но не кратных 6, в последовательности целых чисел. Программа получает на вход целые числа,...
Banan125027 Banan125027  04.02.2021 21:20
исправить и дописать программу (паскаль), не проняла как сделать преобразование строка на число с...
dimaarmytrac95 dimaarmytrac95  04.02.2021 21:19
ТЕСТ ПО ИНФОРМАТИКИ КАКОЙ ПРАВИЛЬНЫЙ ОТВЕТ...

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