Хелп! Информатика Найти сумму квадратов целых чисел от 33 до 38. Cоставить программу на Паскале, используя оператор цикла For. А затем составить программу еще одним используя цикл While или Repeat.
agbelova
1
23.11.2020 11:58
0
Другие вопросы по теме Информатика
Danya0011
20.02.2022 16:09
steshina27
20.02.2022 16:17
Ангелина0113
20.02.2022 16:53
Боня227
01.04.2020 12:28
xnxnxnxnx
01.04.2020 12:28
12345678998765432129
20.11.2020 12:40
Jiio
20.11.2020 12:40
annattarsova0
15.04.2020 10:50
Sergay121
27.04.2021 21:34
Анкляка
27.04.2021 21:32
Популярные вопросы
- ВопросНайдите приближение числа а=3,721 с точностью до второй значащей...
3 - Як називається чоловічий і жіночий гаметофіт у голонасінних рослин?...
2 - монолог с землёй фото нету...
1 - Кімде жауап бар болса , берш ...
3 - Определите необходимую силу для поднятия груза массой 100кг, если вы...
3 - 8. Соотнести типы движений организмов с определениями l-таксисы ll-тропизмы а)...
1 - Какие слова говорят о том, что черепаха страдает так же, как человек?...
3 - Спишите предложения, выделяя обособленные обстоятельства, выраженные...
3 - Задания суммативного оценивания за 3 четверть по предмету «Русский язык...
3 - Достоїнство стилю полягає в ясності доказом цього служить те що коли...
1
program a1;
var a,b: integer;
begin
for a := 33 to 38 do
begin
b:= b + (a*a);
end;
writeln (b);
end.
program a2;
var a,b: integer;
begin
a:= 33;
while a < 39 do
begin
b:= b + (a*a);
a:= a+1;
end;
writeln (b);
end.
Объяснение: