1. Информатика
  2. Паскаль 7 ! ! в семизначном

Паскаль 7 ! ! в семизначном числе найти и вывести все цифры меньше 5

EvelinaKPACABA EvelinaKPACABA    3   18.04.2019 11:06    24

Ответы
missvaleria2 missvaleria2  07.06.2020 21:21

Var x:Integer ;

Begin

Writeln('x=') ;read(x) ;

While x>0 do begin

If x mod 10<5 then write(' ', x mod 10);

X :=x div 10;end;

End.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
elvinsasylbaeva elvinsasylbaeva  09.08.2019 04:30
Водном из изданий книги л.н. толстого «война и мир» 1024 страницы. какой объём памяти (в мбайт) заняла бы эта книга, если бы лев николаевич набирал её на компьютере в одной...
galina510 galina510  08.12.2020 21:21
Ученик заполнил таблицу Excel и получил следующий результат. Он не может понять, что происходит с данными в таблице. Объясните причину проблемы и подскажите правильные пути...
Dmitro222 Dmitro222  08.12.2020 21:25
Зделайте сор по информатике ​...
glo2 glo2  08.12.2020 21:27
Написать программу для вычисления заданного выражения. Значение x вводится пользователем с клавиатуры. Значение e приблизительно равно 2,71828 принять его в качестве константы...
Sosushka Sosushka  04.09.2019 06:50
Сообщение занимает 2 страницы. на каждой странице по 48 строк. в каждой строке по 64 символа. найдите информационный объём такого текста, если при его составлении использовали...
Варенье11333333 Варенье11333333  04.09.2019 06:50
Имеются купюры и монеты следующего номинала: 5000, 1000, 500, 100, 50, 10, 5, 2 и 1 рубль. данные купюры и монеты имеются в неограниченном количестве. как выдать работнику...
чебурек2283 чебурек2283  04.09.2019 06:50
Вкаких областях применяют промышленных робатов?...
elizaveta871 elizaveta871  23.06.2019 10:00
Технология, при которой изображение на экране полностью соответствует изображению на бумаге после распечатки, называется wysiwyg (what you see is what you get) и переводится:...
keue435436 keue435436  23.06.2019 10:00
Ввести матрицу. найти сумму четных элементов матрицы. если она отрицательна, то заменить элементы четных столбцов матрицы на 1, в ином случае нечетных столбцов на -1. матрицу...
alenapolyakova5 alenapolyakova5  23.06.2019 10:00
Восстановите ip-адрес по фрагментам. в ответе укажите последовательность букв, обозначающих фрагменты, в порядке, соответствующем ip-адресу 1)а 2.17, б 16, в .65, г 8.121...

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