Помогите решить задание по информатике 8 класс (Паскаль) ДАЮ 25 БАЛЛОВ!!!!!!!ЗАДАНИЕ:

Помогите решить задание по информатике 8 класс (Паскаль)

ДАЮ 25 БАЛЛОВ!!!!!!!

ЗАДАНИЕ:

ВВЕСТИ ДВА ЧИСЛА. Отыскать Величайшее ЧЕТНОЕ ЧИСЛО ( Т.Е ИСПОЛЬЗОВАТЬ УСЛОВИИ ) ПРИ НАЛИЧИИ 2-ух УСЛОВИЙ ПИШЕТСЯ, К примеру ТАК (Agt;...) AND (A=...).

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

var a,b:integer;

begin

 readln(a,b);

 if(a mod 2 = 0) and (a gt; b) then

   writeln('Наивеличайшее, четное число: ',a)

 else begin

   if(b mod 2 = 0) and (b gt; a) then

     writeln('Наивеличайшее четное число: ',b)

   else

     writeln('Не найдено');

 end;

end.

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


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

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

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

Войти на сайт