Очень срочно! Осталось около 1 часа! помогите!
Напишите программу поиска минимального числа, большего числа K, которое делится на D.
Входные данные:
два целых числа: первое число K, второе число D ( 0 < K,D ≤ 32000 ).
Выходные данные:
число являющееся ответом на условие задачи.
Ответы
Ответ дал:
0
var k,d,i:integer;
begin
readln(k); readln(d);
i := 0;
while (i*d<k) do i := i + 1;
writeln(i*d);
end.
begin
readln(k); readln(d);
i := 0;
while (i*d<k) do i := i + 1;
writeln(i*d);
end.
Похожие вопросы
2 года назад
7 лет назад
7 лет назад
10 лет назад
10 лет назад