Написать программу Паскаль — перенести первое число в конец Число…

Question

Написать программу Паскаль — перенести первое число в конец Число трехзначное Помогите

Answer 1

97

asdas911

30 марта 2023

Прошуvar a, b, c, d: integer; begin readln (d); a: =d div 100; b: =d mod 100 div 10; c: =d mod 10; writeln (b, c, a); end. Можно еще сократить: var a, b, c, d: integer; begin readln (d); writeln (d mod 100 div 10, d mod 10, d div 100); end. Или даже: var a, b, c, d: integer; begin readln (d); a: =d div 100; writeln (d — a*100, a); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: