Есть ответ 👍

Только нужно решить не через if, a через case1. пользователь вводит неотрицательное однозначное число a. написать программу: вычисляющую в случае ввода 1 - площадь круга с радиусом a, вычисляющую в случае ввода 2 - площадь квадрата со стороной a, вычисляющую в случае ввода 3 - площадь равностороннего треугольника со стороной a, сообщение «нужно ввести число 1, 2, 3» в остальных случаях.

278
354
Посмотреть ответы 2

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


Var a: integer; s: real; begin readln(a); case a of 1: begin s: =pi*a*a; writeln(s); end; 2: begin s: =a*a;   writeln(s); end; 3: begin s: =a*a*sqrt(3)/4;   writeln(s);   end; else writeln('нужно ввести число 1, 2, 3'); end; end.
Killkor3000
4,8(73 оценок)

D: \фотографии\города\севастополь\морской парад.jpg

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