задача в паскале помогите!!!!! из числа а(четырёхзначное) получить число b записанное в обрадном порядке
5-9 класс
|
вроде так, я уже давно в паскале не работала
program abcd;
uses crt;
var a,b,c,d,e,f,g,h:integer;
begin
Clrscr;
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.
Другие вопросы из категории
Создайте проект для расчёта корней квадратного уравнения. Продумайте названия
текстовых полей, чтобы не запутаться при программировании. Чтобы поставить
«квадрат» для икса, просто используйте ещё одну метку (Label). При нажатии на кнопку
«Рассчитать» вычисляется дискриминант, и, если он меньше нуля, то сразу
выдаётся сообщение «Корней нет» (через MsgBox), если равен нулю, то рассчитывается только значение X1, а если больше нуля – то X1 и X2. Рассчитанные значения корней должны
появиться в соответствующих текстовых полях на форме. Пример вида формы показан
на рисунке:
а) дискретность
б) понятность
в) точность
г) конечность
в любом порядке. Каждый такой номер в компьютерной программе записывается минимально возможным и одинаковым целым количеством байт (при этом используют посимвольное кодирование и все символы кодируются одинаковым и минимально возможным количеством бит). Определите объем памяти, отводимый этой программой для записи 40 номеров. 1) 120 байт 2) 160 байт 3) 200 байт 4) 240 байт
Читайте также
Задача в паскале
Помогите с решением
В трехзначном числе x зачеркнули его вторую цифру, когда к образованному при этом двузначному числу приписали вторую цифру числа x, то получилось число n. Найдите число x
а)Определите количество знаков в числе;
б)Определите четность числа;
в)Выведите описание числа,например,"нечетное однозначное число","четное двухзначное число" и тд.
Пример ввода: 347
Пример вывода: Нечетное трехзначное число
а) определите количество знаков в числе;
б) определите чётность числа;
в) выведите описание числа ,наприме нечётное одназначное число чётное двухзначное число
Даны натуральное число n и вещественные числа a1, a2, ..., an. Определить среднее арифметическое вещественных чисел...
ПАСКАЛЬ,ПОМОГИТЕ ПОЖАЛУЙСТА