Написать на языке паскаль: умножить трехзначное число, введенное с клавиатуры на 2, если оно содержит в своей записи хотя бы одну единицу.
270
416
Ответы на вопрос:
Fl : = false; t : = n; while (t > 0) and not fl do beign if (t mod 10 = 1) then fl : = true; t : = t div 10; end; if (fl) then n : = n*2;
с
Объяснение:
Процесс восстановления информации из ее представления в закодированном виде к исходному виду
Популярно: Информатика
-
alevtina199126814.03.2021 18:32
-
Merlin13131.07.2021 06:28
-
genyaryabinina19.02.2020 20:32
-
Maximys200112329.01.2023 08:34
-
смурфик1507.04.2023 23:04
-
чссддпдппзжпжржо09.11.2020 09:01
-
мαрия13.01.2020 11:08
-
Nisawe26.10.2021 18:31
-
щотььллл29.09.2021 07:21
-
rezaev119.10.2020 21:14