1. Информатика
  2. Найти произведение четных

Найти произведение четных чисел оканчивающихся на 4 в паскаль

anyasuharevap0ai22 anyasuharevap0ai22    2   08.11.2019 19:19    5

Ответы
vasiapasi17 vasiapasi17  10.10.2020 11:59

program dsa;

var a, proz : integer;

begin

writeln('a = ');

read(a);

if (a mod 10 = 4) then

proz := proz * a;

write(proz);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Ameya Ameya  15.03.2019 09:50
Дан массив.все его элементы умножить на последний элемент....
Arkanius Arkanius  15.03.2019 09:50
Какие существуют названия компьютерных словарей?...
Husky333 Husky333  25.02.2022 11:52
Как сделать сетку в логомирах3?...
IlonaLike IlonaLike  25.02.2022 11:33
No4 A B C D E 1 5 8 3 1 2 2 7 3 6 4 4 Οι 5 C2=A$2* $B1-$A$3+C1 ?C4?...
saha299 saha299  25.02.2022 11:33
№3. Запишите программный код к задаче. (56) Вычисление суммы чисел от 2 до 16, включительно....
Kek346582 Kek346582  25.02.2022 11:26
Я знаю что это есть в учебнике, но мне скоро нужно собираться и нужно написть :_)...
vbratilova4 vbratilova4  14.12.2020 23:58
Как сделать такой запрос в access?...
Король234 Король234  14.12.2020 23:57
Информатика работа с задачами по кумиру...
ДобротаПротивЗла ДобротаПротивЗла  14.12.2020 23:57
Упростить логическое выражение. Доказать правильность выполнения упрощения через таблицу истинности А)( (А V B) ) ̅& A Б) A V(¯A&B)&¯( A & B)...
Рикашикина Рикашикина  14.04.2020 14:23
В клетку с адресом D1 занесена формула: =ЕСЛИ(И(A1 -3;A1 5);1;0) Чему может быть равно значение клетки A1, если значение клетки D1 равно 1...

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