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

Question

Информатика

Сюра

29 сентября, 19:16

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

+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.