Можно ли на языке pascal записать ТРЕХЗНАЧНОЕ число наоборот? Если можно-то как?Есть ли такой оператор который переворачивает числа?СРОЧНО!!!
Ответы
Ответ дал:
0
write(number mod 10,number div 10 mod 10, number div 100 mod 10);
Пример программы:
program test;
uses crt, classes;
var number:integer;
begin
number:=123;
write(number mod 10,number div 10 mod 10, number div 100 mod 10);
delay(1000); //чтобы окно ещё на 1 секунду осталось, функция из модуля crt
end.
Для Pascal ABC.NET:
program test;
var number:integer;
begin
number:=123;
write(number mod 10,number div 10 mod 10, number div 100 mod 10);
sleep(1000); //чтобы окно ещё на 1 секунду осталось
end.
Вывод:
321
Пример программы:
program test;
uses crt, classes;
var number:integer;
begin
number:=123;
write(number mod 10,number div 10 mod 10, number div 100 mod 10);
delay(1000); //чтобы окно ещё на 1 секунду осталось, функция из модуля crt
end.
Для Pascal ABC.NET:
program test;
var number:integer;
begin
number:=123;
write(number mod 10,number div 10 mod 10, number div 100 mod 10);
sleep(1000); //чтобы окно ещё на 1 секунду осталось
end.
Вывод:
321
Ответ дал:
0
при этом delay(1000) и crt можно убрать
Ответ дал:
0
это из турбопаскаля, но в дельфах и фрипаскале тоже работает
Ответ дал:
0
исправил для варианта, работающем в pascal abc.net
Ответ дал:
0
Огромное спасибо.
Ответ дал:
0
не за что
Вас заинтересует
2 года назад
7 лет назад
7 лет назад
9 лет назад
10 лет назад