Question

Известны ширина и длина прямоугольника. Сторона квадрата в два раза меньше длины прямоугольника. Найти периметры квадрата и прямоугольника

Answer 1

program aliona;
var a,b:integer;
c,p1,p2:real;
begin
writeln('vvedite sirinu =');
readln(a);
writeln('vvedite dlinu=' );
readln(b);
p1:=0;
p2:=0;
c:=b/2;
p1:=(a+b)*2;
p2:=4*c;
writeln('p1=',p1,'p2=',p2);
readln;
end.

Answer 2

конечно

Answer 3

1) Дано четырехзначное число. Верно ли, что среди его цифр есть кратные трем. 2) Даны три целых числа. Вывести среднее значение числа (средним числом назовем то, которое меньше наибольшего, но больше наименьшего числа). 3) Напишите эффективную программ, которая по двум данным натуральным числам х и у, не превосходящим 10000, подсчитывает количество натуральных чисел, заканчивающихся нулем, на отрезке [х,у] (включая концы отрезка).

Answer 4

все надо на языке паскаль, буду очень благодарен

Answer 5

хорошо решение куда написать?

Answer 6

можешь сюда