Регистрация
narutogovno
13.01.2021 13:21
Информатика
Есть ответ 👍

Напишите программы по условиям ниже. Интерфейс программ сделайте клиентоориентированным, а именно: приветствие, описание назначения программы, предложение ввести переменные и вывод с описанием.

1. Напишите программу, которая по введенным пользователем трём сторонам треугольника должна определить является ли треугольник равносторонним, равнобедренным или вырожденным. Вычислить его площадь, вывести сообщение о том, какой треугольник был рассчитан.

2. Напишите программу, которая по введённым пользователем положительным числам ведёт подсчёт чётных и нечётных, до того момента, пока пользователь не введёт ноль или отрицательное число. Используйте while или repeat на ваше усмотрение.

3. Напишите программу «Синоптик», которая по введенной температуре, дает комментарий о погоде и рекомендацию о прогулке. Проявите фантазию. Используйте не менее 5 диапазонов температур. Пример. Входные данные 12 (в ºС). Выходные данные: «Прохладный денек. Одевайся потеплее».

182
435
Посмотреть ответы 2

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

prodaction2016
prodaction2016
4,4(32 оценок)

ого, чуть позже напишу ответ, ок?

Svetic1985
Svetic1985
4,5(68 оценок)

работающая программа:

program v1;

var x, a, b, s, l, k, r, t: real;

begin

writeln ('введите стоимость билета в бизнес класс');

readln(x);

writeln ('сколько билетов в бизнес класс не продали? ');

readln (a);

writeln ('сколько билетов в эконом класс не продали? ');

readln (b);

s: = 100*x;

t: = 1/2*b*x;

l: = a*x;

k: = t+l;

r: = s-k;

writeln (r);

end.

Популярно: Информатика