Даны целые числа a,b…

Даны целые числа a,b,c написать программу определяющую есть ли среди них четные числа если есть вывести true иначевывестиfalse

в избранное

svet1968

03 сентября 2022

Program Pr1; uses crt; var a,b,c: integer; f: boolean; Beginclrscr; f: =false; readln (a,b,c); if (a mod 2=0) or (b mod 2=0) or (c mod 2=0) then f: =true; writeln (f); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Задайте свой вопрос

У исполнителя Вычислитель две команды, которым присвоены номера: 1. Приписать 4 2. Разделить на 2

Напишите пожалуйста программу на языке Паскаль: Дано число

Помогите придумать фрази протилежні за змістом

Даны три числа, если первое число положительно, то два других уменьшить в два раза, в противном случае увеличить…

Помогите написать прогр. На языке паскаль

Помогите решить задачи, Плииз!

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

Паскаль Дано четырехзначное натуральное число, найти первую и последнююцифру

27400

Алгебра

14822

Английский язык

14216

Биология

7369

Другой

720

18829

8304

15850

5255

11818

23332

15992

73118

8152

466

46271

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: