1. Информатика
  2. Паскаль. напишите программу

Паскаль. напишите программу для вывода четырехзначного числа в обратном порядке. ,!

АльфисГугу АльфисГугу    2   14.09.2019 03:00    0

Ответы
viktoriafedorip0a2an viktoriafedorip0a2an  07.10.2020 13:14
Var a, b:integer;
begin
write('Введите число: ');
readln(a);
repeat;
  b:=b*10+a mod 10;
  a:=a div 10;
until a=0;
writeln(b);
readln;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
TaKuRGRAF TaKuRGRAF  14.12.2020 08:56
Дан код программы определите результат программы код a= архитектура print ( a[2:5]= ,a[2:5]) print ( a[0]= ,a[0]) print ( a[6:]= ,a[6:]) print ( max(a)= ,max(a)) print ( min(a)=...
nastialeon nastialeon  14.12.2020 08:56
Измените программу так, чтобы: а) рисовалась сплошная вертикальная линия красного цвета; б) линия располагалась по диагонали экрана (штрихпунктирная, желтого цвета)....
lgolar lgolar  14.12.2020 08:56
быстрей дам ответ 50б ответить на вопросы...
NarkoBaronTif NarkoBaronTif  14.12.2020 08:56
Эта функция проверяет состояние результата в зависимости от того, истинно это условие или ложно. 1 - OR 2 - IF 3 - AND 4 - NOT...
вероника04122006 вероника04122006  28.05.2019 16:20
1) значения элементов двумерного массива а были равны 0. затем значения некоторых элементов были изменены (см. представленный фрагмент программы): n : = 0; for i: =1 tо 5 do for...
Lolikalkogolik Lolikalkogolik  28.05.2019 16:20
562500 символов это сколько байтов?...
VovanHovan VovanHovan  28.05.2019 16:20
Даны три маски файла, однозначно определяюших имя файла. известно, что имя этого файла состоит из 10 символов, а расширение из 3. в ответе укажите имя этого файла ( например: spravka.doc)...
Victoria0NK Victoria0NK  28.05.2019 16:20
Найти все числа из промежутка от а до в, у которых больше всего делителей...
Maqa11 Maqa11  28.05.2019 16:20
Дан массив вещественных чисел x[8]. каждый отрицательный элемент заменить на его абсолютную величину....
Pomogihd Pomogihd  22.12.2020 13:28
Алфавит племени Мультик состоит из 128 букв. Какое количество информации несёт одна буква этого алфавита?...

Популярные вопросы