Лабораторная работа №4 Тема: Процедуры у ф-ии Написать подпрограмму, которая вычисляет объем цилиндра. Параметрами функции должны быть радиус и высота цилиндра
|
Лабораторная работа № 4 Тема: Процедуры у ф-ии
Вычислить n,x  Решение задачи 2 Алгоритм:
Program primer; Uses crt; Var a,b:real; Function chisla(i:real):integer; Var s:integer; Begin s:=0; While i>1 do Begin i:=i/10; s:=s+1; end; chisla:=s; end; begin clrscr; writeln(‘введите два числа больше 1’); readln(a,b); If chisla(a)>chisla(b) then writeln(‘в первом числе, цифр больше чем во втором’,’ ‘,’в 1-ом=’,chisla(a),’ ‘,’во 2-ом=’,chisla(b)); If chisla(a)=chisla(b) then writeln(‘во втором числе, цифр больше чем в первом’,’ ‘,’в 1-ом=’,chisla(a),’ ‘,’во 2-ом=’,chisla(b)); If chisla(a) writeln(‘колличество цифр в первом и во втором одинакого’,’ ‘,’в 1-ом=’,chisla(a),’ ‘,’во 2-ом=’,chisla(b)); readln; end. ПРОДОЛЖЕНИЕ СЛЕДУЕТ… |
Похожие:
 | Лабораторная работа №4 Тема: Процедуры у ф-ии Написать подпрограмму, которая вычисляет объем цилиндра. Параметрами функции должны быть радиус и высота цилиндра Составить программу решения задачи с использованием ф-ии нахождения факториала и числа сочетаний из n по m | | Объем первого цилиндра равен 12 м Объем первого цилиндра равен 12 у второго цилиндра высота в три раза больше, а радиус основания – в два раза меньше, чем у первого.... |
| Работа v-1 Задание B9 (№4879) Прямоугольный параллелепипед описан около цилиндра, радиус основания которого равен Объем параллелепипеда равен 27. Найдите высоту... | | Работа v-2 Задание B9 (№4869) Прямоугольный параллелепипед описан около цилиндра, радиус основания и высота которого равны 9 Найдите объем параллелепипеда |
| Найдите объем Прямоугольный параллелепипед описан около цилиндра, радиус основания и высота которого равны Найдите объем параллелепипеда | | Задания В11, цилиндр, конус Прямоугольный параллелепипед описан около цилиндра, радиус основания которого равен Объем параллелепипеда равен 16. Найдите высоту... |
| 1. Диагональ цилиндра равна 8 см и составляет с основанием угол 60º. Найдите объем цилиндра Прямоугольный равнобедренный треугольник с катетами по 4 см вращается около гипотенузы. Найдите объем тела вращения | | Прямоугольный параллелепипед описан около сферы радиуса Найдите его объем Прямоугольный параллелепипед описан около цилиндра, радиус основания и высота которого равны Найдите объем параллелепипеда |
| Тема урока домашнее задание Лабораторная работа №1 «Измерение объема жидкости с помощью измерительного цилиндра» | | Подготовка к контрольной работе по теме «Цилиндр, конус, шар» Осевое сечение цилиндра – квадрат, площадь основания цилиндра равна 25π с Найдите площадь полной поверхности цилиндра |