Дано ціле трьохзначне число, яке складається з неоднакових цифр. Визначте, яка з його цифр більша: перша чи друга. Як правильно написати програму на Паскалі?
Дано ціле трьохзначне число, яке складається з неоднакових цифр. Визначте, яка з його цифр більша: перша чи друга. Як правильно написати програму на Паскалі?
Гость
Ответ(ы) на вопрос:
Гостьvar a,b, d:integer;
begin
read (d);
a:=d div 100;
b:=d div 10 mod 10;
if a>b then Write ('перша більша') else Write ('друга більша')
end.
Не нашли ответ?
Похожие вопросы