Составить программу: 1) вычислить произведение натуральных чисел кратных 5, от 10 до 40 2) вычислить сумму квадратов натуральных чисел от 11 до 19
KoCmiK11
3
30.09.2019 05:40
0
Другие вопросы по теме Информатика
thebesteconomist
27.07.2019 01:40
yurkamail
17.04.2020 19:23
fdffxdf
02.09.2019 14:10
Jordanik4456
12.06.2019 05:30
smirnovaanastas5
12.06.2019 05:30
аня2934
12.06.2019 05:30
sbordog1337bogdan
12.06.2019 05:30
DashaL04
12.06.2019 05:40
redvellk7
20.05.2021 20:10
Популярные вопросы
- Какова была роль сражения при аустерлице для россии и франции?...
1 - Вычислите удобным подобрав подобные слагаемые.14а+6b-18a-12b,-20с+(с-+6),11-3×(5у+9)...
2 - От поезда,идущего со скорость 72 км/ч ,отцепляется вагон,который...
3 - 2. не всі сполуки слів є словосполученнями в рядкуа вражений словами...
2 - Вкаком соотношении необходимо смешать 38%-ный раствор хлорида...
1 - Краеведение почему святых называют пресветлым знаменем? какую...
1 - Найди все числа, которые можно подставить вместо буквы m в числителе...
2 - Составить план повести гоголя «нос»...
1 - Америго веспуччи не ні зертеді?...
3 - :перечислить основные слои населения европы и их основные черты...
1
1...
Uses crt;
var s,i:integer;
begin
s:=1;
for i:=10 to 40 do
if i mod 5 = 0
then s:=s*i;
writeln (s);
end.
2
Uses crt;
var s,i:integer;
begin
for i:=11 to 19 do
s:=s+(i*i);
writeln (s);
end.