Написать на языке паскаль: умножить трехзначное число, введенное с клавиатуры на 2, если оно содержит в своей записи хотя бы одну единицу.

BOMJangLOX BOMJangLOX    1   23.05.2019 19:40    1

Ответы
moranikatya moranikatya  19.06.2020 14:22
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;
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика