Войти Регистрация Спроси ai-bota

:напечатать и подсчитать сумму всех четных чисел от 10 до 30.

Ответ:

Патич232

24.06.2020 16:58

10,12.14,16,18,20,22,24,26,28,30:общее количество 11

0,0(0 оценок)

Ответ:

витльд

24.06.2020 16:58

var
sum,i: integer;
begin
write('Чётные числа от 10 до 30: ');
for i:= 10 to 30 do
if i mod 2 = 0 then
begin
write(i:4);
sum:=sum+i;
end;
writeln;
writeln('Их сумма = ',sum);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

Дианчик777

17.01.2021 06:39

Отвечайте на вопросы: 1) Сноски это -2) Гиперссылка это-3) Напишите алгоритм создания гиперссылки-...

наира203

04.07.2020 16:30

Из каких простых действий состоит выполнение каждой команды...

lesheboker0228

04.12.2022 19:25

Вчём заключается принцип rgb-кодирования...

slolia

04.12.2022 19:25

Составить программу согласно которой с клавиатуры водятся два числа а компьютер определяет делиться ли первое число на второе...

SnegRainbow

28.01.2021 00:29

Вывести на экран квадраты чисел от 11 до 27 ....

ЛесяКисс

28.01.2021 00:29

Написать в программе паскаль: пирожок в столовой стоит а рублей и b копеек. определите, сколько рублей и копеек нужно заплатить за n пирожков. программа получает на...

shadow909

12.08.2020 05:39

Написать в программе паскаль: дано целое число. если оно положительное и трехзначное, найти сумму первой и третьей цифры этого числа, в противном случае сообщить, что...

Масянька189

12.08.2020 05:39

Написать в программе паскаль: дано целое число. если оно двузначное, найти сумму его цифр....

KaKTyZzZz

12.06.2022 00:14

Составить алгоритм вычисления произведения 6 чисел введённых с клавиатуры !...

petrov100469

25.11.2020 22:07

Составить алгоритм вычисления произведения шести чисел введенных в клавиатуру...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку