Program Z;
var x:integer;
BEGIN
write(' Задайте количество котят: ');
read(x);
write('Кол-во ног равно ',(4*(1+x))*4);
END.
Объяснение:
Program Z;
var x:integer;
BEGIN
write(' Задайте количество котят: ');
read(x);
write('Кол-во ног равно ',(4*(1+x))*4);
END.
Объяснение: