Даны два числа Х и У. Удвойте первое число, если оно больше второго, и оба числа, если это не так. ПОМОГИТЕ ПОЖАЛУЙСТА
Ответ:
Листинг программы
program test;
var
q,w : integer;
begin
write('введите первое: ');
readln(q);
readln(w);
if (q>w) then write(q)
else write(q,',',w);
end.