Алгоритмизация и Программирование

Урок 29-30

Тема: Решение задач на циклы. Контрольная работа №3 «Циклы на Паскале».

Цель: закрепить навыки решения задач на Паскале; контроль знаний учащихся.

 

1. Проверка домашнего задания (Повторить теоретические вопросы).

2. Решение задач

1. Найти сумму делителей каждого из целых чисел от 50 до 70.

program z1;

uses crt;

var a,b,c,i: integer;

begin

for a:=50 to 70   do  begin i:=0;

  for b:=1 to a do

if a mod b = 0 then

     i:=i+b; writeln(a:4,i:5);

 end;

end.

1. Найти все натуральные числа a, b, c из интервала от 1 до 20, для которых выполняется равенство: a2-b2=c.

2. Вычислить сумму:

​

   3.Найти все целочисленные решения системы    

​

​

​

​

​

​

​

​

​

​

​

​

​

​

​