Pascal ABC. Ввести двузначное число, определить равняется ли его сумма пяти.
Pascal ABC. Ввести двузначное число, определить равняется ли его сумма пяти.
Гость
Ответ(ы) на вопрос:
Гостьvar n:integer;
begin
readln(n);
if ((n div 10)+ (n mod 10) )=5 then
writeln('Сумма равно 5')
else writeln('Сумма не равна 5');
end.
Не нашли ответ?
Похожие вопросы