Дано целое число n. увеличить его в 3 раза если число положительное. Построить блок-схему и написать программный код на языке Паскаль.

Question

Информатика

Руджула

24 октября, 13:12

Дано целое число n. увеличить его в 3 раза если число положительное. Построить блок-схему и написать программный код на языке Паскаль.

+2

Ответы (1)

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

Нелсун · Answer 1

Program p1; var n:integer; begin Writeln ('Введите число') ; Readln (n) ; if n>0 Then a: = (n*3) and (n mod 2=0) Else; Writeln (n) ; Readln; End.

не точно нужно дополнить, но что-то типо этого