Предмет: Информатика, автор: milushaprincess

Нужно определить состав трехзначного числа и записать в Pascal Abc

Ответы

Автор ответа: akhtem26ua
0
var
a,i:integer;
begin
write('Введите число:');
readln(a);
writeln('Единицы: ',a mod 10);
a:=a div 10;
writeln('Десятые: ',a mod 10);
writeln('Сотые: ',a div 10);
readln;
end.
Похожие вопросы
Предмет: Английский язык, автор: Аноним
Предмет: География, автор: Лиза8991441