tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составить программу на
Составить программу на языке с .цель: напечатать на экране минимальное число , которое больше 200, делится на 17.
valerijamarkov
3 02.10.2019 17:01
0
Ответы
NekitKrut2007
02.10.2019 17:01
var n: integer;
begin
n: =200;
while n mod 17< > 0 do
n: =n+1;
write('n=',n);
end.
вроде !
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
zdacieva07
01.06.2019 16:40
Можно ли из таблицы удалить столбец? строку? ячейку?...
яИзРая
20.12.2020 08:06
очень нужно для Сора 4. А) НАЗОВИТЕ 2 ИНСТРУМЕНТА РЕДАКТИРОВАНИЯ; B) КАКОЕ РАСШИРЕНИЕ У ФАЙЛОВ, СОЗДАННЫХ В SketchUp? C) КАКОЕ РАСШИРЕНИЕ РАСПОЗНАЕТСЯ БОЛЬШИНСТВО ПРИНТЕРОВ?...
Iilya9330
17.11.2020 11:39
Inscape редакторында кандай курал саймандар бар? тезирек жауап бериниздерши...
какулькаТВ
06.08.2019 15:00
Какое устройство компютера не входит в состав системного блока...
НикитаСекретчик
16.04.2020 10:26
Какие ответы правильные? (На фото неверные)...
rik172
16.04.2020 10:26
Що відбудеться при виконанні команди button1.BackColor = Color.Aqua;?а-зміна кольору фону кнопкиб-зміна розміру кнопкив-зміна тексту напису кнопкиг-зміна кольору напису...
NikaName007
16.04.2020 10:26
Какие ответы верны? На фото не так....
Мегамозг0511
16.04.2020 10:26
Сколько единиц будет выведено на экран в результате работы программы: for j := 0 to 3 do begin i := 2; while i = 6 do begin i := i + 2; end; writeln ( 1 );end;...
СургутянкаАся
09.03.2021 18:16
B=4**2 мне это информатика 6 класс...
amersjeo
09.03.2021 18:16
Укажи запись математической функции наязыке программированияC++: квадратный корень из ХA)Sqrt(x)B) fabs(x)C)pow(x,y)D) %E) *...
Популярные вопросы
Переведите десятичную дробь в обыкновенную и найдите значение выражения...
3
Кконцу vi века знатные франки становятся крупными земледельцами....
3
Сумма двух углов, котловые получаются при пересечении двух прямых...
1
Менын атым - мен сыныпта окимын анамнын аты - . ол жаста. менын анам...
3
Охарактеризуйте основні рівні живої матерії. 25 ...
1
Найдите значение буквенного выражения,используя свойства действий:...
2
Решить примеры109- буква г112- буква г...
2
1.напишите уравнение касательной к графику функции. f(x)=4x-3x^2...
2
Какая масса оксида цинка образуется при сгорании 260 г цинка в 224...
3
Запиши выражение и найди их значения.к разности чисел 37 и 22 прибавь...
1
var n: integer;
begin
n: =200;
while n mod 17< > 0 do
n: =n+1;
write('n=',n);
end.
вроде !