1. Информатика
  2. Есть число abc, выписать

Есть число abc, выписать все трехзначные числа abc если b четное a=1-9 b=1-9 c=1-9 все выписанные числа должны сложиться

volodyanadya94p08rdb volodyanadya94p08rdb    3   30.09.2019 06:20    0

Ответы
Megatrolll228 Megatrolll228  09.10.2020 04:54

Var s,i:integer;

begin

for i:=100 to 999 do

begin

if ((i mod 100 div 10)mod 2=0) and ((i mod 100 div 10)<>0)

 then writeln (i);

s:=s+i;

end;

writeln (s,' сумма всех таких чисел');

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
jane24p075cn jane24p075cn  27.05.2020 19:12
Откройте файл с текстом программы и определите результат не выполнения ОЧЕНЬ НАДО />...
roman81rudi roman81rudi  28.05.2020 19:15
текст, набранный на компьютере содержит, 4 страницы, на каждой странице 32 строки, в каждой строке 64 символа. Определите информационный объем сообщения , если каждый символ...
lineage29201682 lineage29201682  27.05.2020 19:16
У исполнителя Квадратор две команды, которым присвоены номера: 1. возведи в квадрат 2. прибавь b (b – неизвестное натуральное число) Первая из них возводит число на экране...
алина3851 алина3851  30.03.2020 19:27
Вот капец я тут новенькая вот как ответить на во на знания.сом если я нажимаю, а оно не печатает если что я на компе....
zeca123415 zeca123415  28.04.2022 15:46
Начертите координатную плоскость на листе в клетку. Перенесите координаты, указанные ниже (-5; 4), (-7; 4), (-9; 6), (-11; 6), (-12; 5), (-14; 5), (-12; 4), (-14; 3), (-12;...
nikita140982ee nikita140982ee  28.04.2022 18:46
В одной из кодировок UTF-32 каждый символ кодируется 32 битами. Петя написал текст (в нём нет лишних пробелов): «Ель, кедр, сосна, кипарис, лиственница, можжевельник — хвойные...
Yanок Yanок  28.04.2022 18:54
1.Сделать программу нахождение наибольший из трёх величин ! 2Имеются данные о колиство лет трёх призёров напишите программу выводящая возраст самого младшего призера....
гарамьбм гарамьбм  28.04.2022 19:05
Известны координаты точек А(6,7), Б(3,4), В(3,10), Г(6,9), Д(12,9),Е(12,7), Ж(15,10), З(15,4), И(12,5), К(6,5). Полученные точки соедините в следующей последовательности:...
igornagornov0 igornagornov0  29.04.2022 00:02
Имеется полоска размером 1*N. Кузнечик стоит на первой клетке, далее он может прыгать вперед на 1 или 3 клетки. Сколько есть кузнечику добраться от начальной клетки до последней?...
22050 22050  29.04.2022 00:49
створити масив, елементами якого є 5 перших членів геометричної прогресії, перший член якої дорівнює -2, а її знаменник дорівнює 2. Вивести масив на екран...

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