1. Информатика
  2. Uses crt; var a: integer;

Uses crt; var a: integer; begin for a: =10000 to 99999 do if (a mod 133=125) and (a mod 134=111) then writeln(a); end. из этой программы сделать программу с циклом repeat

creeperm477 creeperm477    2   22.09.2019 18:20    2

Ответы
kenanyusifov02 kenanyusifov02  08.10.2020 10:29
Uses crt;
var a:integer;
begin
a:=10000;
repeat
if (a mod 133=125) and (a mod 134=111) then writeln(a);
a:=a+1;
until a>99999;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
kristina761 kristina761  21.09.2019 16:10
Маша, жанна, таня и оля пришли на день рождения к своей подруге. подарки они положили в одно место. это были: цветы, кукла, раскраска и лото. именинница знала следующее:  маша, жанна,...
Direx1337 Direx1337  21.09.2019 16:20
Всолнечном городе живёт 70 коротышек. из них 20 занимаются в драмкружке 10 коротышек из хора, в хоре 6 спортсменов, в драмкружке 8 спортсменов, а 3 спортсмена посещают и драмкружок...
deonisius03 deonisius03  21.09.2019 16:20
Среди сказочных персонажей волшебного лукоморья проводилось анкетирование по любимым героем сказок. самыми популярными оказались трое: баба яга, учёный кот кощей бессмертный. всего...
онелдпрлпр1 онелдпрлпр1  27.07.2019 03:00
Переведите число 12032 из десятичной систему счисления в двоичную...
775645 775645  27.07.2019 03:00
Сделайте кроссворд на тему моделирование 10-15 вопросов, нужно по информатике. p.s с ссылкой в exel...
Юличка111333 Юличка111333  27.07.2019 03:00
А23+4в а23-4в в 16-ой системе счисления...
Dillzy Dillzy  27.08.2019 22:05
Для чего нужен язык html и python...
228дима228ннчнччн 228дима228ннчнччн  27.08.2019 22:12
Что такое устройство и функционирование информационной системы? предъявить основные понятия, какие то определения и по мелочи...
алёчек алёчек  27.08.2019 22:20
Вычислить значение у по одной из формулалг функциянач вещ х, у вывод “введите два числа” ввод х, у если х 10 то у : = х+2 иначе у : = х-2 все вывод укон...
ololshka2016 ololshka2016  27.08.2019 22:44
Осуществите циклический сдвиг компонент заданного вектора a(n) влево на одну позицию, то есть получите вектор а = (a2 , a3 , an , a1 ). на паскале , заранее...

Популярные вопросы