Задать вопрос
8 сентября, 02:09

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

+3
Ответы (1)
  1. 8 сентября, 02:50
    0
    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.

    не точно нужно дополнить, но что-то типо этого
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Дано целое число n. увеличить его в 3 раза если число положительное. Построить блок-схему и написать программный код на языке Паскаль. ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы