Регистрация
ЯнаLove7
29.01.2022 05:54
Информатика
Есть ответ 👍

Написать программу вывода на экран всех трехзначных чисел, кратных и 6, и 4, и заканчивающихся на цифру 8. программу написать темя способами с использованием циклов for, while, repeat. !

228
419
Посмотреть ответы 2

Ответы на вопрос:

Vladyslav2009
Vladyslav2009
4,8(84 оценок)

  var i: integer;

begin

for i: =100 to 999 do if(i mod 6 =0) and (i mod 4 = 0) and (i mod 10 = 8) then write(i, ' ');

end.

 

{while}

var i: integer;

begin

  i: =100;

while i< =999 do begin

if( if(i mod 6 =0) and (i mod 4 = 0) and (i mod 10 = 8) then write(i, ' '); inc(i); end;

end.

 

 

  {repeat}

var i: integer;

  begin

i: =100;  

repeat

begin

  if(i mod 6 =0) and (i mod 4 = 0) and (i mod 10 = 8) then write(i, ' ');

inc(i); end;  

until i< 1000;

end.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Даниил986
Даниил986
4,7(18 оценок)
Uses crt; var i,s: integer; begin clrscr; s: =0; i: =7; while i< 100 do begin s: =s+i; i: =i+7 end; writeln(s); end.

Популярно: Информатика