ТутРешу.Ру

Задача в паскале помогите!

Задание:

Задача в паскале помогите! Из числа а (четырехзначное) получить число b записанное в обрадномпорядке

Решение:

Вроде так, я уже давно в паскале не работала program abcd; uses crt; var a,b,c,d,e,f,g,h: integer; beginClrscr; writeln ("a=",a); readln (a); c: =a div 1000; d: =a mod 1000; e: =d div 100; f: =d mod 100; g: =f div 10; h: =f mod 10; b=h*1000+g*100+e*10+c; readln (c); readln; end.




Знаете другой ответ?

Отправить свой ответ