даны трёхзначные числа, если число кончается на 4 вывести его на

Даны трёхзначные числа, если число кончается на 4 вывести его на экран

Задать свой вопрос
Юлия Бескшикина
Нечаянно
Вовка Верешацкий
Начинается программка так:
Regina
Program o
Ирина Котарова
var
Карина
Begin
Valerij
На первый вопрос ответьте: массив, либо две-три переменные?
Сергей Богаенко
Две-три переменные
Грабузов Владислав
VarA,B,C:integer;BeginRandomize;A:=random(900)+100;B:=random(900)+100;C:=random(900)+100;if A mod 10 = 4 then Write(A,' ');if B mod 10 = 4 then Write(B,' ');if C mod 10 = 4 then Write(C,' ');End.
Жека Гарканов
Три, нечаянно данные переменные. Как произнесли - так и сделано.
Толик Водона
Спасибо
1 ответ
Выводит все 3значные числа которые отвечают условию

var
    i: integer;

begin
    for i := 100 to 999 do
        if i mod 10 = 4 then
            write(i, ' ');
end.

, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт