Лабораторная работа №4 Тема: Процедуры у ф-ии Написать подпрограмму, которая вычисляет объем цилиндра. Параметрами функции должны быть радиус и высота цилиндра icon

Лабораторная работа №4 Тема: Процедуры у ф-ии Написать подпрограмму, которая вычисляет объем цилиндра. Параметрами функции должны быть радиус и высота цилиндра



НазваниеЛабораторная работа №4 Тема: Процедуры у ф-ии Написать подпрограмму, которая вычисляет объем цилиндра. Параметрами функции должны быть радиус и высота цилиндра
Дата конвертации08.12.2012
Размер10.79 Kb.
ТипЛабораторная работа
источник

Лабораторная работа № 4

Тема: Процедуры у ф-ии


  1. Написать подпрограмму, которая вычисляет объем цилиндра. Параметрами функции должны быть радиус и высота цилиндра.




  1. Определить в каком из данных двух целых чисел больше цифр




  1. Составить программу решения задачи с использованием ф-ии нахождения факториала и числа сочетаний из n по m

Вычислить n,x


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

Алгоритм:

  1. Вводим два целых числа

  2. Делим каждое число на 10 и к сумме прибавляем 1.

  3. Выводим на экран количество цифр


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 Тема: Процедуры у ф-ии Написать подпрограмму, которая вычисляет объем цилиндра. Параметрами функции должны быть радиус и высота цилиндра iconЛабораторная работа №4 Тема: Процедуры у ф-ии Написать подпрограмму, которая вычисляет объем цилиндра. Параметрами функции должны быть радиус и высота цилиндра
Составить программу решения задачи с использованием ф-ии нахождения факториала и числа сочетаний из n по m
Лабораторная работа №4 Тема: Процедуры у ф-ии Написать подпрограмму, которая вычисляет объем цилиндра. Параметрами функции должны быть радиус и высота цилиндра iconОбъем первого цилиндра равен 12 м
Объем первого цилиндра равен 12 у второго цилиндра высота в три раза больше, а радиус основания – в два раза меньше, чем у первого....
Лабораторная работа №4 Тема: Процедуры у ф-ии Написать подпрограмму, которая вычисляет объем цилиндра. Параметрами функции должны быть радиус и высота цилиндра iconРабота v-1 Задание B9 (№4879)
Прямоугольный параллелепипед описан около цилиндра, радиус основания которого равен Объем параллелепипеда равен 27. Найдите высоту...
Лабораторная работа №4 Тема: Процедуры у ф-ии Написать подпрограмму, которая вычисляет объем цилиндра. Параметрами функции должны быть радиус и высота цилиндра iconРабота v-2 Задание B9 (№4869)
Прямоугольный параллелепипед описан около цилиндра, радиус основания и высота которого равны 9 Найдите объем параллелепипеда
Лабораторная работа №4 Тема: Процедуры у ф-ии Написать подпрограмму, которая вычисляет объем цилиндра. Параметрами функции должны быть радиус и высота цилиндра iconНайдите объем
Прямоугольный параллелепипед описан около цилиндра, радиус основания и высота которого равны Найдите объем параллелепипеда
Лабораторная работа №4 Тема: Процедуры у ф-ии Написать подпрограмму, которая вычисляет объем цилиндра. Параметрами функции должны быть радиус и высота цилиндра iconЗадания В11, цилиндр, конус
Прямоугольный параллелепипед описан около цилиндра, радиус основания которого равен Объем параллелепипеда равен 16. Найдите высоту...
Лабораторная работа №4 Тема: Процедуры у ф-ии Написать подпрограмму, которая вычисляет объем цилиндра. Параметрами функции должны быть радиус и высота цилиндра icon1. Диагональ цилиндра равна 8 см и составляет с основанием угол 60º. Найдите объем цилиндра
Прямоугольный равнобедренный треугольник с катетами по 4 см вращается около гипотенузы. Найдите объем тела вращения
Лабораторная работа №4 Тема: Процедуры у ф-ии Написать подпрограмму, которая вычисляет объем цилиндра. Параметрами функции должны быть радиус и высота цилиндра iconПрямоугольный параллелепипед описан около сферы радиуса Найдите его объем
Прямоугольный параллелепипед описан около цилиндра, радиус основания и высота которого равны Найдите объем параллелепипеда
Лабораторная работа №4 Тема: Процедуры у ф-ии Написать подпрограмму, которая вычисляет объем цилиндра. Параметрами функции должны быть радиус и высота цилиндра iconТема урока домашнее задание
Лабораторная работа №1 «Измерение объема жидкости с помощью измерительного цилиндра»
Лабораторная работа №4 Тема: Процедуры у ф-ии Написать подпрограмму, которая вычисляет объем цилиндра. Параметрами функции должны быть радиус и высота цилиндра iconПодготовка к контрольной работе по теме «Цилиндр, конус, шар»
Осевое сечение цилиндра – квадрат, площадь основания цилиндра равна 25π с Найдите площадь полной поверхности цилиндра
Разместите кнопку на своём сайте:
Документы


База данных защищена авторским правом ©lib2.podelise.ru 2000-2013
При копировании материала обязательно указание активной ссылки открытой для индексации.
обратиться к администрации
Документы