< >

в паскаль сделать цикл типа пока: напечатать минимальное число большее 200 которое нацело делится на 17.СРОЧНО!!!

Ответы

Ответ дал: m0nclous
0
Var i:integer;
Begin
i:=200;
while (i mod 17 <> 0) do i:=i+1;
writeln(i);
end.
Похожие вопросы
Українська мова
2 года назад
Казки казкарив свиту
Русский язык
2 года назад
выдели суффикс в словах печь дружить нести рисовать
Математика
7 лет назад
Помогите решить пожалуйста (765-279):6+80:16*7 по действиям срочно!
Алгебра
7 лет назад
Докажите тождество : 1)(a³+1)(a-1)=(a²-a+1)(a²-1) 2)m³+1=m(m+1)+(1-m)(1-m²) 3)( a+2)(a²-2a+4)-a(a-3)(3+a)=9a+8
Математика
10 лет назад
Сравните дроби 10/303 и 7/202
Химия
10 лет назад
Определите молярную концентрацию раствора, полученного при растворении сульфата натрия массой 42,6 г в воде массой 300 г, если плотность полученного раствора равна 1,12 г/мл
Алгебра
10 лет назад
Помогите, пожалуйста! Докажите тождество: 2cos2 (45˚ + 4α)+sin8α=1
Химия
10 лет назад
1. Речь идет о химическом элементе кислород: а) кислород используется в авиации и космонавтике; б) кислород – составная часть воздуха; в) смесь кислорода и водорода в соотношении 1:2 – гремучий