паскаль авс дан прямоугольник надо найти полупериметр
5-9 класс
|
var a,b:real;
begin
readln(a,b);
writeln('p=',a+b);
end.
program poluperimetr;
var a,b,p:real;
begin
writeln('Введите a');
readln(a);
writeln('Введите b');
readln(b);
p:=a+b;
writeln('Полупериметр прямоугольника = ' ,p);
end.
Другие вопросы из категории
протоколу http. Фрагменты адреса файла закодированы буквами от А до Ж.
Запишите последовательность этих букв, кодирующую адрес указанного
файла в сети Интернет.
А)
.txt
Б)
://
В)
http
Г)
circ
Д)
/
Е)
.org
Ж)
slon
Читайте также
Даны два целых числа А и В (А меньше В). Найти сумму всех целых чисел от А до В включительно.
верно ли,что первая цыфраа данного числа чётная?
3)найти все трёхзначные числа,которые состоят из разных цыфр,а их сумма равна А(А вводится с клавиатуры)
4)найти все симметричные натуральные числа(палиндромаиз промежутка от А до В(А и В вводится с клавиатуры)
Даны два целых числа А и В (А меньше В). Найти сумму квадратов всех целых чисел от А до В включительно.
Дано целое числоN( больше 0).Найти сумму N квадрат +( N +1) квадрат+(N +2) квадрат + ...+ ( 2умножитьN) квадрат ( целое число)