Пятница, 29.11.2024, 12:34
Главная Регистрация RSS
Приветствую Вас, Заглянувший
Меню сайта
Программирование
Для студента
SEO & SMO
Познавательно
Категории раздела
Delphi [2]
Assembler [5]
Курсовые проекты [4]
Разное [1]
Pascal [16]
Невероятно, но факт [1]
Заказать курсовую [1]
SEO [1]
С/C++ [10]
Дипломные работы [1]
Бизнес-цитатник [2]
Опросник
Что по вашему играет наибольшую роль в ранжировании ресурса?
Всего ответов: 31
[ Результаты · Архив опросов ]
Поддержать проект
Благодарность выразило,чел: 7
Статистика

Полная статистика

Онлайн всего: 7
Гостей: 7
Пользователей: 0

Главная » Статьи » Pascal
Вычислить объем цилиндра с радиусом основания r и высотой h

Program zad3;
Var
x,r,h,v :real ;
Begin
writeln('введите радиус основания');
readln (r); 
writeln('введите высоту');
readln (h);
x:=(pi*(r*r)*h);
writeln (x:0:0);
End.

Категория: Pascal | Добавил: Freeman (19.07.2011)
Просмотров: 6048 | Теги: Паскаль | Рейтинг: 5.0/1
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]