tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Написать программу выводящую
Написать программу выводящую на экран минимальное число больше 1000 которое делется на 189 паскаль
aleksbotalov33p00u0t
3 02.10.2019 11:00
2
Ответы
NastyaVelly
09.10.2020 11:45
program morethen1000;
var a:integer;
begin
a:=1000;
while a mod 189 <> 0 do
a:=a+1;
writeln(a);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Unforgettable77
02.06.2019 15:20
Напишите программу в паскаль для решения следующей : для четырех произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие результаты. если первое из...
долин1
02.06.2019 15:20
Определите, что получится в результате выполнения в графическом редакторе следующей последовательности действий: 1. установить основной цвет жёлтый 2. выбрать инструмент...
bushina2
02.06.2019 15:10
Общие свойство объекта-оригинала и модели где объект оригинат планета земля, а модель объкта глобус?...
dinok3
19.04.2019 10:39
Нужно все 20 вариант составить блок схему и программу...
Alisa27Alisa
19.04.2019 10:48
Дано натуральное число n. если оно делится на 4, вывести на экран ответ n=4k(где k - соответствующее частное) , если остаток от деления на 4 равен 1: n=4k+1, 2: n=4k+2,...
сабина422
19.04.2019 10:50
Напишите на листочке таблицу...
nekitpundya2256
19.04.2019 10:52
Всельскохозяйственном кооперативе работают 5 сезонных рабочих. норма сбора овощей составляет n килограмм. оплата труда производится по количеству собранных овощей: k рублей...
kerdivar86
21.04.2020 17:58
Какое логическое выражение эквивалентно выражению ¬(A v B) ^ ¬C? 1) (A v B) ^ ¬C 2) (A ^ B) ^ C 3) (¬A ^ ¬B) ^ ¬C 4) (A v B) ^ C С объяснением...
o0505
21.04.2020 17:58
Дано описание массива: var a:array [1..41] of integer; Здесь описан масив а из целочисленных значений. При выполнении этого опер. ячеек целого типа. компьютера будет выделено...
Юля7071
17.08.2019 14:40
Вкаких случаях нельзя выделить фрагмент ,используя инструмент выделение?...
Популярные вопросы
Скажите слово: существительное, мужского рода, 1-ого склонения, множественного...
1
We won t have holidays soon .will we have holidays soon ? nick hasn...
1
Скласти розповідь про весняну пісню сенички...
1
Решить 77к-69к-271=5417 465+53х-46х=3139...
3
Виписати в реченні усім селом зібралися біля річки чи ставу інші частини...
3
Перевести текст this exciting city london...
1
7809 900 метров сколько это километров и метров...
3
Решить примеры 87 м + 360 дм 8 дм - 38 мм 73 см 9 мм умножаем на 400...
2
Составить рассказ на про рабочий день своего друга (можно без перевода)...
2
Вякому столітті народився шевченко? 50 ів,хто перший дасть правильну...
2
program morethen1000;
var a:integer;
begin
a:=1000;
while a mod 189 <> 0 do
a:=a+1;
writeln(a);
end.