Напишите в тетради ответы на вопросы: 1. Как изменить фон окна в РуGame? 2. Как загрузить готовые объекты?

289

386

Посмотреть ответы 1

Ответы на вопрос:

smokeech

Информатика

4,5(53 оценок)

program z1;//заголовок - название программы

var a,b,c:real;//описание переменных a,b,c вещественного типа

begin//начало тела программы

write ('a = ');//вывод на экран сообщения: а = для за у пользователя переменной а

readln (a);// ввод переменной a пользователем

write ('b = ');//вывод на экран сообщения: b = для за у пользователя переменной b

readln (b);// ввод переменной b пользователем

write ('c = ');//вывод на экран сообщения: b = для за у пользователя переменной c

readln (c);// ввод переменной c пользователем

if (a<=0) or (b<=0) or (c<=0) then write ('Такого треугольника не существует')//оператор ветвления 1 часть если условие верно, то программа выведет сообщение: Такого треугольника не существует

else write ('P = ',a+b+c)//оператор ветвления 2 часть если условие НЕ верно, то программа выведет периметр треугольника сообщением: Р = число

end.//конец тела программы