Задачи на применение операторов организации цикла
1. Составить программу, которая вычисляет и печатает сумму квадратов нечетных чисел от 1 до 19.
2. Вычислить кубы чисел от 11 до 20.
3. Вычислить длины окружностей с радиусами от 21 до 30.
4. Составить программу, которая вычисляет и печатает сумму квадратов четных чисел от 2 до 20.
5. Написать программу, которая вычисляет и печатает двадцать площадей кругов с радиусами от 1 до 20.
6. Написать программу, которая вычисляет и печатает объемы цилиндров высотой h=20 и радиусами оснований от 1 до 15.
7. В первый час работница делает 12 заготовок, во второй – на 2 заготовки больше и т.д. Сколько заготовок она сделает за 8 часов работы?
8. Вычислить значения синусов в интервале от 0 до 6.283, шаг 0,31415.
9. Вычислить значения квадратов косинусов в интервале от 0 до 7,770 с шагом 0,1.
10. Вычислить значение квадратных корней из нечетных чисел в интервале от 1 до 21.
11. Напишите программу для вычисления площадей квадратов со сторонами от 3 до 10.
Образец решения одной задачи.
На языке PASCAL.
Цикл с параметром
program z411;
var a,s: integer;
begin
for a:=3 to 10 do
begin
s:=sqr(a);
writeln (‘a=’,a,’ s=’,s);
end;
end.
Цикл с предусловием:
program z411;
var a,s: integer;
begin
a:=3;
while a<=10 do
begin
s:=sqr(a);
writeln (‘a=’,a,’ s=’,s);
a:=a+1;
end;
end.
Цикл с постусловием:
program z411;
var a,s: integer;
begin
a:=3;
repeat
s:=sqr(a);
writeln (‘a=’,a,’ s=’,s);
a:=a+1;
until a>10
end.