Цель: закрепить знания по программированию на языке Паскаль (линейный алгоритм, разветвляющийся, цикличный алгоритм).
Составьте программу по образцу на Паскаль и запишите ее для вывода со своими переменными: a=810, g=16.
program lineiny;
Var x,y: integer;
Begin
x : = 432;
y:=21;
y : = x div 100+y;
x : = ( x mod 100 ) * 10;
x : = x + y;
writeln(x);
End.
Составьте программу на нахождение площади круга.
Составьте программу по образцу на Паскаль и запишите ее для s := 0,
цикл k от 3 до 8, s := k + 7, переменные: цел s, k, найти s.
program cikl;
Var s,k: integer;
Begin
s := 0;
for k := 3 to 8 do
s := k + 9;
writeln(s);
End.
Составьте программу на Паскаль на условие по принадлежности точки отрезку АВ.
Составьте программу на Паскаль case of по образцу на числа от 6 до 9:
program vetvlenija;
var NUM :integer;
begin
writeln('Введите число от 0 до 3:');
readln (NUM);
case NUM of
0:writeln ('Нуль');
1:writeln ('Один');
2:writeln ('Два');
3:writeln ('Три')
else writeln ('Такого нет');
end;
end.
Примечание: использование программы PascalABCNET для выполнения номеров разрешается.
Создать таблицу умножения чисел от 1 до 9 (9 строк, 9 столбцов). В ячейке, соответствующей произведению 1*1, должна быть записана формула, которая затем должна быть скопирована во все остальные 80 ячеек. Решение в двух вариантах:
1)с использованием смешанных ссылок;
2)с использованием формулы массивов.
Метод 1. С использованием смешанных ссылок.
Составим таблицу. Введем по столбцам цифры от 1 до 9 и по строкам.
В ячейку В2 введем формулу: =$A2*Bкопируем эту ячейку во все остальные ячейки диапазона В2:J10. Получим таблицу умножения:
таблица умножения в EXCEL с смешанных ссылок
Метод 2. С использованием формулы массивов.
В ячейки В2:J2 введем цифры от1 до 9 и в ячейки А14:А22.
Выделим ячейки В14:J22 и введем формулу =B13:J13*A14:A22. Нажмем Ctrl+shift+Enter, чтобы формула вставилась как формула массива. Получим:
таблица умножения в EXCEL с формул массива