Напишите программу, которая вводит с клавиатуры два целых положительных числа и

Напишите программку, которая вводит с клавиатуры два целых положительных числа и выводит на экран , правильно ли ,что
В паскале
Оба введенных числа кончаются на цифру 3

Ни одно из введенных чисел не кончается ни на 2,ни на 4

Задать свой вопрос
Amelija Podperigora
Что необходимо сделать?
Андрей Берестенников
В паскале написать программу которая вводит с клавиатуры два целых положительных числа и выводит на экран верно ли что...
Рахматулов Кирилл
Необходимо использовать тип boolean либо можно обычным условием?
1 ответ

program raf105;

var a,b:integer;

begin

write('Введите два числа: ');

readln(a,b);

if ((a mod 10) = 3) and ((b mod 10) = 3)

 then writeln('Оба кончаются на 3: Верно')

 else writeln('Оба заканчиваются на 3: Ошибочно');

if ((a mod 10) = 2) or ((a mod 10) = 4) or ((b mod 10) = 2) or ((b mod 10) = 4)

 then writeln('Ни одно не кончается на 2 или 4: Ошибочно')

 else writeln('Ни одно не заканчивается на 2 либо 4: Верно');

end.

Программка написана на языке PascalABC.NET

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт