Вывести все числа от 1 до 1000, которые: -- кратны 3 и 5
Вывести все числа от 1 до 1000, которые: -- кратны 3 и 5
Гость
Ответ(ы) на вопрос:
Гостьif (a[i]>=1) and (a[i]<=1000) and (a[i] mod 3 = 0) and (a[i] mod 5 = 0) then
writeln a[i];
Не нашли ответ?
Похожие вопросы