Дано число его удвоить и утроить составить программу в паскаль

Question

Информатика

Марина

27 июня, 23:46

Дано число его удвоить и утроить составить программу в паскаль

+1

Ответы (1)

Знаете ответ?

Назар · Answer 1

Program удвоение;

var a:real;

Begin

read (a) ;

a:=a*2;

writeln (a) ;

End.

Program утроение;

var a:integer;

Begin

read (a)

a:=a*3;

writeln (a) ;

End.