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

Question

Информатика

Вагуб

8 сентября, 02:09

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

+4

Ответы (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.

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