) Найти и выдать на печать все трехзначные числа, которые при

) Отыскать и выдать на печать все трехзначные числа, которые при умножении на 2 кончаются цифрой 8, а при умножении на 3 - цифрой 4. При неименьи таких чисел - сказать об этом
задачка на решении в паскаль

Задать свой вопрос
Тема Санатов
На каком ЯП написать?
Дмитрушин Гена
на паскаль
1 ответ

var
    i, k: integer;
begin
i:= 100;
k:= 0;
 
while i lt; 1000 do
begin
if (i * 2 mod 10 = 8) and (i * 3 mod 10 = 4) then write(i, ' ')
else k:= k + 1;
i:= i + 1;
end;
if k = 900 then writeln('Таких чисел не существует!');end.
 
Щейкивский Владимир
спасибо огромное
Сема Голочалов
Если я для тебя посодействовал, отметь, если тебе не трудно, мой ответ как лучший.
Элина
окей, но почему-то программа не запускается
Егор Ахметьев
Секунду.
Семён Черемицкий
Так обязано работать.
Iljuha
удивительно, программка все одинаково не запустилась
Виктор
У меня всё работает.
Арсений Бадашов
не верно использован оператор
Ваня Вильшанский
все заработала, спасибо
Амелия
Если тебе не трудно, отметь, пожалуйста, решение как наихороший ответ.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт