Составьте программу для определения,что больше площадь круга радиусом a или площадь...

0 голосов
76 просмотров

Составьте программу для определения,что больше площадь круга радиусом a или площадь квадрата со стороной a-значения числа a вводятся с клавиатуры(площадь круга вычисляется по формуле:S=ПиR^2)помогите пожалуйста:( паскаль


Информатика (12 баллов) | 76 просмотров
Дано ответов: 2
0 голосов

Показываю:

1) Вводишь переменную а

2) Добавляешь переменную для площади квадрата

3) Добавляешь переменную для площади круга

4) Выполняешь вычисление по формуле и присваиваешь его переменной для площади круга, т.е.  Sk=pi*r*r; (pi сразу задаешь значение - это пи)

5) Выполняешь вычисление по формуле и присваиваешь его переменной для площади квадрата, т.е. S=r*r;

6) Проверка:

если (Sk > Sv) {

вывести результат

} если нет {

вывести 2 результат

}

Удачи!

(370 баллов)
0 голосов

Так?

var a, R: integer; S:real;

begin

writeln('Введите радиус круга');

readln(R);

writeln('Введите сторону квадрата');

read(a);

S:=3.14*R*R;

a:=a*a;

If S>a then write('Площадь круга больше площади квадрата')

else write('Площадь квадрата больше площади круга');

end.

(127 баллов)
0

на каком это языке программирования?

0

Не шарю в паскале, но надо приучаться. Да, все верно. Ты молодец, надеюсь у тебя нет программных ошибок.

0

pascal