Содержание
- 2. Задача. Даны 4 целых числа. Найдите наибольшее из них. Program chisla; var a,b,c,d,f:integer; Begin writeln(‘Введите 4
- 3. Назначение: Встречаются похожие или повторяющиеся фрагменты Улучшает структуру программы Улучшает внешний вид программы Уменьшает вероятность ошибок
- 4. Описание процедуры: procedure name (список формальных параметров); описательная часть; begin тело процедуры; end; ( исходные данные
- 5. ПАРАМЕТРЫ ФАКТИЧЕСКИЕ ФОРМАЛЬНЫЕ ИСПОЛЬЗУЮТСЯ В ОСНОВНОЙ ПРОГРАММЕ ПЕРЕДАЮТСЯ ПРОЦЕДУРЕ ПРИ ЕЕ ВЫЗОВЕ ИСПОЛЬЗУЮТСЯ В ПОДПРОГРАММЕ ЗАМЕНЯЮТСЯ
- 6. Решение задач Задача. Даны 4 целых числа. Найдите наибольшее из них.
- 7. Program chisla; var a,b,c,d,f : integer; procedure two (var x,y: integer; k:integer); begin if x>y then
- 8. Задание на дом: Задача1. Даны два числа. Сумма цифр какого числа меньше? ( 2 способа) Задача
- 9. Функции Тема урока:
- 10. Задача 1. Найдите сумму площадей 4 окружностей , если известны их радиусы. program SUMMA; var R1,R2,R3,R4,S1,S2,S3,S4,S:
- 11. program SUMMA; var R1,R2,R3,R4,S1,S2,S3,S4,S: real; procedure ; begin end; begin writeln(‘Введите радиусы 4-х окружностей’); readln(R1,R2,R3,R4); S:=S1+S2+S3+S4;
- 12. Функции function name (список формальных параметров):тип результата; описательная часть; begin тело функции; end; В теле функции
- 13. Задание 2. Рассчитать значение x, определив и использовав необходимую функцию. Program Znachenie; var x1,x2,x3,x:real; function drob
- 15. Скачать презентацию