Номер 6 и 7. Пожалуйста

0 голосов
24 просмотров

Номер 6 и 7. Пожалуйста


image

Информатика (16 баллов) | 24 просмотров
Дан 1 ответ
0 голосов
Номер 6.
S=91
i=5
Номер 7.
Program ps;var a,b,c,h,p:integer;s:real;Beginwriteln('введите а'); readln (a);writeln('введите b'); readln (b);writeln('введите с'); readln (c);writeln('введите h'); readln(h);p:=a+b+c;s:=(a*h)/2;writeln('P=',p);writeln('S=',s);end.
(538 баллов)
0

Program ps;
var a,b,c,h,p:integer;
s:real;
Begin
writeln('введите а'); readln (a);
writeln('введите b'); readln (b);
writeln('введите с'); readln (c);
writeln('введите h'); readln(h);
p:=a+b+c;
s:=(a*h)/2;
writeln('P=',p);
writeln('S=',s);
end.

0

Спасибо