Напишите эффективную программу, которая по двум данным натуральным числам x и y,не превосходящим 10000, выводит на экран и подсчитывает количество
5-9 класс
|
натуральных чисел, кратных восьми, на отрезке [ x,y] ( включая концы отрезка)
program zadacha;
uses crt;
var x, y, i, count: integer;
begin
clrscr;
write ('enter x and y: ');
readln (x, y);
if x<y then begin
for i:=x to y do begin
if i mod 8 = 0 then begin
writeln (i);
count:=count + 1;
end;
end;
end
else for i:=y to x do begin
if i mod 8 = 0 then begin
writeln (i);
count:= count + 1;
end;
end;
end;
writeln ('vsego chisel ', count);
readkey;
end.
Другие вопросы из категории
Какое программное обеспечение необходимо иметь на компьютере, чтобы иметь возможность использовать услугу WWW?5. Как визуально можно определить, является графическое изображение гиперссылкой, не щёлкая по нему мышью?6. Что такое Web-сервер?7. Какие из приведённых ниже адресов сайтов не могут существовать (не соответствуют правилам
Читайте также
результат
2.дано целое число.напишите,программу которая выводит на экран последнюю цифру данного числа,затем возводит ее в квадрат и выводит на экран монитора результат
Напишите эффективную программу, которая по двум натуральным числам а и b, не превосходящим 30 000, подсчитывает количество натуральных чисел, кратных 3, на отрезке [а, b] (включая концы отрезка). Программа получает на вход два натуральных числа а и b, при этом гарантируется, что 1 а b 30 000. Проверять входные данные на корректность не нужно. Программа должна вывести одно число: количество натуральных чисел, кратных 3, на отрезке [а, b].
N, Написать ему выводящую на экран последовательность натуральность натуральных чисел отN до 1, номер 3 Даны натуральные числа N и К.Написать программу выводящую на экран последовательность из N чисел , каждое из которых равно К хотя бы что нибудь решите помогите очень надо!!!!!!!!!
Составить программу,которая выводит на экран сумму нечетных чисел от 1 до 30 в Pascal ABC.
По данным натуральным числам M и N не превосходящие 2011, найти последнюю цифру в десятичной записи числа M в степени N.
Заранее спасибо!