Составьте программу в паскале, которая находит наименьшее из чисел кратное 3.Количество чисел не меньше 1000.
Предмет:
ИнформатикаАвтор:
isaiahconst
inf = 32767;
var
a, min : integer;
begin
min := inf;
while not eoln do
begin
read (a);
if (a < min) and (a mod 3 = 0) then min := a;
end;
if min < inf then writeln (min)
else writeln ('Нет чисел, кратных 3-ем');
end.
Автор:
parkДобавить свой ответ
пользуясь алгоритмом вставь пропущенные буквы учеб. за 4 кл. 2 ч. пожалуйста
образец: по линейке (по луне)
на лодк
к зелен
в арбуз
у бабушк
к тёт
у тёт
на акварел
на посылк
на олен
о нефт и газ
к старости
на завтрак , обед и ужин
в мор
на воздух
в печал и радост
Предмет:
Русский языкАвтор:
dylan18Ответов:
Смотреть
образ александра павловича в сказе левша. Срочно!!!
Предмет:
ЛитератураАвтор:
sugar4pqmОтветов:
Смотреть
решить уравнение
-2,7х=256,68
И
(2,8-у)(-0,8)=12/25
С поля вывозили овощи на 10 машинах. Каждая из этих машин делал по 8 рейсов в день и вывозила по 5т овощей за один рейс. Сколько тонн овощей вывезли эти машины за 5 дней.......помогите пожалуйста составить краткую запись.
Предмет:
МатематикаАвтор:
mila51Ответов:
Смотреть