Даны два числа Х и У. Удвойте первое число, если оно больше второго, и оба числа, если...

+226 голосов
3.2m просмотров

Даны два числа Х и У. Удвойте первое число, если оно больше второго, и оба числа, если это не так. ПОМОГИТЕ ПОЖАЛУЙСТА


Информатика | 3.2m просмотров
Дан 1 ответ
+50 голосов

Ответ:

Листинг программы

program test;

var

q,w : integer;

begin

write('введите первое: ');

readln(q);

write('введите первое: ');

readln(w);

if (q>w) then write(q)

else write(q,',',w);

end.