Напишите программу,которая вводит четырехзначное число и вырезает из него вторую цифру
Напишите программу,которая вводит четырехзначное число и вырезает из него вторую цифру
Ответ(ы) на вопрос:
program _1;
var a,b,c:integer;
begin
readln(a);
b:=a mod 100;
c:=a div 1000;
a:=c*100+b;
writeln(a);
end.
Буду благодарен за "Лучший ответ"
Не нашли ответ?
Похожие вопросы