Вывести все натуральные числа от 1 до 50 кратные 5 и их сумму, написать программу в паскале
Радькова32
1
08.01.2021 14:59
0
Другие вопросы по теме Информатика
nkarakulina
08.08.2019 04:30
5454540
08.08.2019 04:30
sweetk
08.08.2019 04:30
djokerzcoziirem9
10.10.2019 00:57
iulia085
09.10.2019 23:30
hjhytu
09.10.2019 23:35
диди65
09.10.2019 23:35
senyaavdeev07
09.10.2019 23:45
Marina5839458593
21.09.2019 18:00
Популярные вопросы
- Изъявительное наклонение переводится на немецкий язык как Indikativ...
3 - Общей чертой немецкой и русской артикуляционных баз является...
1 - Установите соответствие: Если в составе сложной основы объединены...
2 - Установите соответствие: При образовании гласных воздушная струя...
1 - Из перечисленных пунктов к морфологии относятся: 1) слова с точки...
1 - Что такое акуэма или звуковой образ? невербальный выражения эмоции...
3 - Звуки типа [i у u] являются гласными верхнего подъема нижнего...
3 - По определению _, синтаксис как учение о предложении и его членах...
3 - Из перечисленных типов немецких глаголов в зависимости от типа...
1 - Вставьте соответствующий модальный глагол в предложение … ich...
3
program dlb;
var s,i : integer;
begin
s:= 0;
for i := 1 to 50 do
if i mod 5 = 0 then
begin
s := s + i;
write(i,' ');
end;
writeln();
writeln('Сумма этих чисел: ',s);
end.