Меню сайта
Для студента
SEO & SMO
Категории раздела
Delphi [2] |
Assembler [5] |
Курсовые проекты [4] |
Разное [1] |
Pascal [16] |
Невероятно, но факт [1] |
Заказать курсовую [1] |
SEO [1] |
С/C++ [10] |
Дипломные работы [1] |
Бизнес-цитатник [2] |
Опросник
Поддержать проект
Благодарность выразило,чел: 7
Главная » Статьи » Pascal |
По данным сторонам прямоугольника вычислить его периметр, площадь и длину диагонали
Program zad10; Var a,b,s,p,d:real ; Begin writeln (‘Введите первую сторону’); readln (a); writeln (‘Введите вторую сторону’); readln (b); p:=(a+b)*2; s:=a*b; d:=sqrt((a*a)+(b*b)); writeln (‘Площадь=’,s:0:0); writeln (‘Периметр=’,s:0:0); writeln (‘Диагональ ’,s:0:2); end. | |
Просмотров: 9257
| Теги: |
Всего комментариев: 0 | |