Регистрация
Asimaaa
12.03.2020 23:39
Информатика
Есть ответ 👍

Даны натуральные числа a и b, которые не превышают 1000. вывести их наименьшее общее кратное. вход: 35 21 выход

182
442
Посмотреть ответы 1

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

Зюна
Зюна
4,5(35 оценок)

1) (если оценки  ≤ 5)var

  count, a, i : integer;

begin

  count : = 0;

  for i : = 1 to 20 do

  begin

    read (a);

    count : = count + a div 5;  

  end;

  writeln (count);

end;

 

2)

var

  c : integer;

begin

  c : = 200;

  while c mod 17 < > 0 do c : = c + 1;

  writeln (c);

end;

 

   

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