Напишите программу которая вводит трехзначное число и ,,вырезает '' из него 1 и последнюю цифру
Напишите программу которая вводит трехзначное число и ,,вырезает '' из него 1 и последнюю цифру
Гость
Ответ(ы) на вопрос:
Гостьprogram Project;
uses
crt;
var
a: byte;
begin
clrscr;
Write("Введите число ");
Readln(a);
Writeln("Полученные числа:",(a div 100)," ",(a mod 10));
Readln;
end.
Не нашли ответ?
Похожие вопросы