Войти Регистрация Спроси ai-bota

При каких действий закрашивается внутренняя часть эллипса

Показать ответ

Ответ:

Lybasha7

13.06.2021 11:55

Pascal
1. var a, b: real;
begin
write('Введите стороны прямоугольника: ');
read(a, b);
writeln('Периметр = ', 2 * a + 2 * b);
end.

2. var p, b: real;
begin
write('Введите два числа: ');
read(p, b);
writeln('Произведение = ', p * b);
writeln('Разность = ', p - b);
end.

3. var b: real;
begin
write('Введите длину ребра: ');
read(b);
writeln('Объем = ', b * b * b);
end.

4. var r: real;
begin
write('Введите радиус: ');
read(r);
writeln('Площадь = ', 3.14 * r * r);
end.

5. var a, b, c: real;
begin
write('Введите три стороны: ');
read(a, b, c);
writeln('Периметр = ', a + b + c);
end.

0,0(0 оценок)

Ответ:

ИльяФин

13.06.2021 11:55

Pascal
1. var a, b: real;
begin
write('Введите стороны прямоугольника: ');
read(a, b);
writeln('Периметр = ', 2 * a + 2 * b);
end.

2. var p, b: real;
begin
write('Введите два числа: ');
read(p, b);
writeln('Произведение = ', p * b);
writeln('Разность = ', p - b);
end.

3. var b: real;
begin
write('Введите длину ребра: ');
read(b);
writeln('Объем = ', b * b * b);
end.

4. var r: real;
begin
write('Введите радиус: ');
read(r);
writeln('Площадь = ', 3.14 * r * r);
end.

5. var a, b, c: real;
begin
write('Введите три стороны: ');
read(a, b, c);
writeln('Периметр = ', a + b + c);
end.

0,0(0 оценок)

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

элизабет35

25.06.2020 10:56

Накладная поставки товара в торговый центр представлена в виде таблицы excel. нужно информатика 8 классфото может быть неровным, но думаю там все видно....

АндрееваДаша

05.11.2022 23:56

Для шифровки каждой буквы слова используется двузначное число.известно,что буква ,,к кодируется числом 20.среди слов ,,торт , ,,ёжик , ,,станок , ,,беседа есть слова, кодируемые...

nikitabars7

27.03.2023 23:27

Visual basic! написать процедуру: 1) вычислить сумму элементов массива x(m) 2)те из элементов массива y(n), значения которых равны произведению двух предыдущих умножить сумму...

кейсикупер1

05.04.2022 05:48

Определить, что будет выведено в результате выполнения следующей программы. program b78; var i, k: integer; a: array [1..7] of integer; begin for i: 1 to 7 do a[i]: = i*3; if...

meteleva06

29.08.2020 08:29

Выполнить в mathcad: рассчитать выражения в соответствии с вариантом, используя встроенные функции. получите таблицу значений функции на интервале [a, b] с шагом h. ответ должен...

varlamovanastya

03.10.2022 01:44

Перевести из 10сс в 2сс,8сс,16сс числа 527,593,824,368. ,....

eliza1404

12.01.2023 16:53

Производилась двухканальная (стерео) звукозапись с частотой дискретизации 64 кГц и 24 битным разрешением. Сжатие данных не производилось. В результате был получен файл размером...

Roflobara

19.03.2021 11:38

Program Su,Cifr; Var X, Sum:=0; Sum:=Sum + X mod 10; X:=X div 10; Sum:=Sum + X mod 10 X:=X div 10; Sum:Sum + X; Write ( Сумма цифр = , Sum) End...

nmio2005

24.05.2023 17:43

Перечислите производные величины измерения информации и дайте им характеристику...

mlk000100

24.05.2023 17:43

Каждая буква шифруется двузначным или трехзначгым числом, в зависимости от того гласная она или согласная (при этом не ясно двузначным кодом шифруется гласные или согласные буквы)....

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку