Дано целое число n . увеличить его в 3 раза если

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

Задать свой вопрос
Машенька Турашева
Популярно досконально, полным решением
1 ответ
Program p1;var n:integer;begin Writeln ('Введите число');Readln (n);if ngt;0 Then a:=(n*3) and (n mod 2=0) Else;  Writeln (n);Readln;End. 
не точно необходимо дополнить,но что-то типо этого
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт