1. Какие виды алгоритмов вы знаете?
2. Какие блоки используются в линейном, разветвляющемся и циклическом алгоритмах?
3. Как используются команды цикла в Scratch?
4. Как используются команды разветвляющегося алгоритма?
5. Какие блоки используются для применения команды?
6. Какие блок-схемы используются в циклическом алгоритме?
7. Из каких блоков состоят разветвляющиеся алгоритмы
в Scratch?
Вариант 1. Без операторов цикла.
var
a,b,c,d:integer;
begin
Write('Введите 4 натуральных числа: ');
Read(a,b,c,d);
if a mod 2=0 then Writeln('Корень из ',a,' равен ',sqrt(a));
if b mod 2=0 then Writeln('Корень из ',b,' равен ',sqrt(b));
if c mod 2=0 then Writeln('Корень из ',c,' равен ',sqrt(c));
if d mod 2=0 then Writeln('Корень из ',d,' равен ',sqrt(d));
end.
Пример решения
Введите 4 натуральных числа: 3 8 16 12
Корень из 8 равен 2.82842712474619
Корень из 16 равен 4
Корень из 12 равен 3.46410161513775
Вариант 2. С оператором цикла.
var
i,n:integer;
begin
for i:=1 to 4 do begin
Write('Введите натуральное число: ');
Read(n);
if n mod 2=0 then Writeln('Корень из ',n,' равен ',sqrt(n))
end
end.
Пример решения
Введите натуральное число: 3
Введите натуральное число: 8
Корень из 8 равен 2.82842712474619
Введите натуральное число: 16
Корень из 16 равен 4
Введите натуральное число: 12
Корень из 12 равен 3.46410161513775
Вариант 3. С массивами
var
i:integer;
a:array[1..4] of integer;
begin
Write('Введите 4 натуральных числа: ');
for i:=1 to 4 do Read(a[i]);
for i:=1 to 4 do
if a[i] mod 2=0 then Writeln('Корень из ',a[i],' равен ',sqrt(a[i]))
end.
Пример решения
Введите 4 натуральных числа: 3 8 16 12
Корень из 8 равен 2.82842712474619
Корень из 16 равен 4
Корень из 12 равен 3.46410161513775