Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме 85 тыс рублей в месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 02.02.2009, 17:23   #1
koshkarjov
Пользователь
 
Аватар для koshkarjov
 
Регистрация: 31.01.2009
Сообщений: 26
Сообщение Задачи по Паскалю

1) Чему равен объем цилиндра, если известна его высота и радиус основания.

Я вот тут попробовал сделать, но мне кажется не до конца получилось...

Код:
Program xxx;
var a,b,c:integer;
begin
readln(a);
readln(b);
c:=(a*b);
writeln(a,'_',b,'_',c);
end.
2) Даны значения a,b. Вычислить значение p= 1/a/1/b

Последний раз редактировалось koshkarjov; 02.02.2009 в 18:05.
koshkarjov вне форума
Старый 02.02.2009, 17:41   #2
Викдон
Форумчанин
 
Аватар для Викдон
 
Регистрация: 11.11.2008
Сообщений: 161
По умолчанию

1)
Код:
var r,h:integer;
    V:real;
begin
 write('Vvedite radius: ');
 readln(r);
 write('Vvedite visoty: ');
 readln(h);
 V:=pi*Sqr(R)*H;
 writeln('V= ',V:3:1);
 readln;
end.
2)
Код:
var a,b:integer;
    result:real;

begin
 write('Vvedite a: ');
 readln(a);
 write('Vvedite b: ');
 readln(b);
 result:=(1/a)/(1/b);  {P=b/a}
 write('Itog =',result);
 readln;
end.
Викдон вне форума
Старый 02.02.2009, 18:06   #3
koshkarjov
Пользователь
 
Аватар для koshkarjov
 
Регистрация: 31.01.2009
Сообщений: 26
Сообщение

Большое спасибо!

Последний раз редактировалось koshkarjov; 02.02.2009 в 18:26.
koshkarjov вне форума
Закрытая тема


Купить рекламу на форуме 85 тыс рублей в месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Задачи по Паскалю! profi Помощь студентам 39 15.10.2009 09:29
Задачи по паскалю. Lavron Паскаль, Turbo Pascal, PascalABC.NET 20 05.01.2009 15:34
Задачи по паскалю. Никуся Паскаль, Turbo Pascal, PascalABC.NET 13 28.12.2008 21:33
Задачи по Паскалю MissLove Помощь студентам 15 24.07.2007 11:20