Question

сделайте плиз срочно​

Answer 1

var a,b,p,s:integer;

begin

S:=0;

p:=1;

read(a,b);

s:=a*b;

p:=2*(a+b);

write(s:3,p:3);

end.

2)Если а=8; b=10, то S=80; P=36

Answer 2

Ответ:

var

 a, b, s, p: integer;// Задаем переменным тип данных

begin//Начало блока

 

 a := 8; //Присваем переменой А значение 8

 b := 10; //Присваем переменой B значение 10

 s := a * b; //Выполняем умножение и записываем результат в переменную S

 P := 2 * (a + b); //Выполняем выражение и записываем результат в перменную P

 write(s, '  ', P); //Выводим на экран получившийся результат

end. //Конец блока