Есть ответ 👍

сделайте 8 класс! Язык Паскаль​

112
136
Посмотреть ответы 3

Ответы на вопрос:


program zadanie1; var a,b:real; begin writeln('Введите числа'); readln(a); readln(b); writeln(a*b); end.program zadanie2; var a:real; begin writeln('Введите сторону'); readln(a); writeln('S=',a*a); writeln('P=',4*a) ;end.program zadanie3; var a,b,c:real; begin writeln('Введите стороны'); readln(a); readln(b); c:=(a*b)/2; writeln('S=',c); end.

Вот, вроде.

Объяснение:


Объяснение:

program proizvedenie

var a,b,c:integer;

begin

 read(a,b);

 c:=a*b;

 writeln(c);

end.

program kwadrat

var a,b,c,s:integer;

begin

 read(a,b);

 s:=a*b;

 c:=a*4;

 writeln(c,s);

end.

program treugol`nik

var a,b,s:integer;

begin

 read(a,b);

 s:=a*b;

 s:=s/2;

 writeln(s);

end.


Все числа, в которых присутствует цифра больше 4

Популярно: Информатика