1. Информатика
  2. Составить программу на Паскале:

Составить программу на Паскале: Из чисел от 10 до 99, вывести те числа, у которых сумма цифр четная.

GloomyCat231 GloomyCat231    2   08.04.2021 08:54    0

Ответы
yanaela2006 yanaela2006  08.04.2021 09:00

program Sanya2263;

var i,a,b: integer;

begin

For i:= 10 to 99 do begin

a:=i div 10;

b:=i mod 10;

if (a+b) mod 2=0 then Write(i, ' ');

end;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
89112897334artem1131 89112897334artem1131  20.05.2019 12:30
Строковые величины. паскаль. в данном предложении заменить всюду слог над на слог под . буду !...
vladkorkin75 vladkorkin75  20.05.2019 12:20
Из чего состоит ромашка из листков стебельков лепестков а ещё из чего?...
Beckonechnost Beckonechnost  14.06.2021 20:15
PTHON. Напишите функцию для вычисления факториала заданного числа....
Mаs9n9 Mаs9n9  14.06.2021 20:27
Що потрібно ввести в код html, щоб не мінялися місцями таблиця та фото. Таблиця повинна бути зверху, а коли всталяю фото, то таблиця зміщується вниз. Терміново потрібно,...
tayasivakova tayasivakova  14.06.2021 21:50
Создать проект в visual basic, который определяет минимальное значение из введенных чисел. Количество чисел заранее не известно. нужен код и кнопки...
osadchevasasha osadchevasasha  14.06.2021 21:58
Пользователь вводит номер года. Программа должна вывести Да , если год является високосным, иначе — Нет . В соответствии с григорианским календарём, год является високосным,...
Ekaterina2019 Ekaterina2019  14.06.2021 21:58
Где может быть ошибка в коде? (Python) s= 1 +100* 8 while 81 in s or 882 in s or 8883 in s: if 81 in s: s=s.replace( 81 , 2 ,1) else: if 882 in s: s=s.replace( 882 ,...
Pahnet Pahnet  14.06.2021 21:59
Отсортируй программы по результатам работы. Какого типа будет res в конце программы? 1)res целое число2)res десятичная дробь3)res строка4) интерпритатор выдаст ошибкуа)...
sdtyvbv sdtyvbv  14.06.2021 22:06
Створити форму та розрахувати матеріальну до на оздоровлення працівнику –власне ПІБ, Якщо працівник штатний, то матеріальна до складає 3180 грн, якщо він сумісник, то...
mixailoborin0 mixailoborin0  14.06.2021 22:58
Как открыть стену в геншин импакт с рисунком додокороля на архипелаге золотого яблока...

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