Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
k1 - один катетk2 - другой катетg - гипотенузаs - площадь треугольникаязык програмирования: паскаль.vark1, k2, g, s : real; beginreadln (k1); readln (k2); g : = sqrt(sqr(k1) + sqr(k2)); writeln(g); s : = (k1 * k2) / 2 ; writeln(s)end.
программа на языке pascal, успехов в учебе.
program pr;
var n,m,z,k,i,vm: integer;
begin
readln (n,m,z);
vm: =n*60+m;
i: =1;
while i< =vm do
k: =k+1;
i: =i+z;
end;
writeln (k);
readln;
end.
Популярные вопросы