Мариелла17
25.12.2022 00:09

Паскаль дано натуральное число.найти первую и последнюю цифру

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
sens1980
30.09.2020 19:03

Program Pr1;
var a:integer;
Begin
readln(a);
writeln('Posl.- ',a mod 10);
while a div 10 <>0 do a:=a div 10;
writeln('Perv.- ',a);
end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота