Задать вопрос
24 декабря, 09:21

Помогите написать программу в паскале.

№1.

а : = 40

в : = 10

в : = - а/2*в

если а < в

то с : = в-а

иначе с : = а-2*в

№2.

а : = 5

а : = а+6

в : = - а

с : = а-2*в

+5
Ответы (1)
  1. 24 декабря, 10:57
    0
    Задача №1var a, b, c:real; begina:=40; b: = 10; b: = a/2 * b; if a < b then c: = b - aelsec: = a - 2*b; writeln ('c = ', c) ; end. Задача №2var a, b, c:integer; begina:=5; a: = a + 6; b: = - a; c: = a - 2*b; writeln ('c = ', c) ; end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Помогите написать программу в паскале. №1. а : = 40 в : = 10 в : = - а/2*в если а < в то с : = в-а иначе с : = а-2*в №2. а : = 5 а : = а+6 ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы