1)Написать программу вычисления модуля разность двух данных целых чисел 2)Составить программу вычесляет в котором n суток, часов, минут,
5-9 класс
|
секунд.
3)Составте программу вычисления площади треугольника с основанием а и высотой h. Значение a и h введите с клавиатуры.
3) на pascal.
program ploshad;
uses crt;
var a,h,p: real;
begin
clrscr;
writeln ('Введите основание(a) и высоту(h)');
readln (a,h);
p:= 1/2*a*h;
writeln (' Площадь треугольника= ', p);
end.
var
a,b,z,s:longint;
begin
readln(a,b);
z:=abs(a-b); {модуль разности}
readln(a,h);
s:=a*h; {площадь треуг}
end.
Другие вопросы из категории
а)3600 байт
б)36кбайт
в)360 кбайт
г)3,6 мбайт
Читайте также
Оч срочно:)
Заранее спасибо.)
N, Написать ему выводящую на экран последовательность натуральность натуральных чисел отN до 1, номер 3 Даны натуральные числа N и К.Написать программу выводящую на экран последовательность из N чисел , каждое из которых равно К хотя бы что нибудь решите помогите очень надо!!!!!!!!!
написал программу неправильно. Ниже приведён фрагмент его программы, в котором содержится пять ошибок:
k:=1;
f:=0;
while k<n do
f:=f*k;
k:=k+1