Cоставьте программу которая присвоит переменной х целого типа значение 7 затем вычислите х2

пример:

Program prim2;

uses crt;

var a, b, s:real;

begin

a:=6;

b:=8;

s:=a*b:

write ('площадь прямоугольника равна')

write (s)

end

Question

Наста

10 января, 16:50

+3

Ответы (1)

Знаете ответ на вопрос?

Людаха · Answer 1

Program prim;

var x, y:integer;

begin

x:=7;

y:=x*x;

writeln ('x=', x,' x*x=', y)

end.