| Меню сайта |
|
 |
| Наш опрос |
|
 |
| Статистика |
Онлайн всего: 1 Гостей: 1 Пользователей: 0 |
 |
|
 | |  |
| Главная » 2015 » Январь » 14 » TurboPascal 8
|
uses crt;
var a,v:real;
begin
clrscr;
textcolor(5);
writeln('a=');
Readln(a);
v:=(a*a*a);
Writeln('v:=a*a*a=',v:2:2);
readln;
end.
|
|
Просмотров: 59 |
Добавил: Алина
| Рейтинг: 0.0/0 |
| |
 | |  |
|
| Вход на сайт |
|
 |
| Поиск |
|
 |
| Календарь |
|
 |
| Архив записей |
|
 |
|