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

Написать программу в паскаль (аа+бб)/б*б

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

Suslik1111

31.10.2020 16:04

Как добавить изображение и звук...

116541

05.12.2020 06:21

Каких блоков нет в программе скретч (несколько вариантов ответа)? варианты ...

DashaGaff

27.11.2020 14:01

Оформите алгоритмы для рисования букв«м», «и», «р». составьте алгоритмы рисования слов «мир»,«рим», «мим»....

Racamaxa

30.01.2023 13:27

Когда я хочу зайти на все браузеры комьютер они аварийную ошибку плз...

MrFoksSuper

15.07.2021 19:17

Определить значение s (с решением) s: =1; a: =1 нц для i от 1 до 3 s : = s+i нц для j oт 2 до 3 s : = s+j кц кц...

efimovap17

21.04.2023 16:00

Вавтомашине 5 мест. сколькими человек могут усесться в эту машину, если занять место водителя могут только двое из них? а) 44 б) 48 в)120 г) 240 д) 5...

1010ВАДИМ

30.11.2022 06:56

Встречались ли вы с информационными моделями в повседневной жизни. пример....

kapusta1337

30.11.2022 06:56

Примеры: а) образной информационной модели б) знаковой информационной модели в) смешанной информациооной модели...

BotanicPanik

23.02.2022 02:47

Решить надо а) х1 и ( не х2 или х3) б) х1 и х2 или не х1 и х3 в) х4 и ( х1 и х2 и х3 или не х2 и не х3)...

romanbeletsky2

14.11.2021 13:32

Конспект про форматировании символов. только не больше. про шрифт, размер, начертание и цвет....

Ответ:

marinapogosyan

08.10.2020 23:00

Var a,b:integer;

begin

readln(a,b);

writeln((a*a+b*b)/(b*b));

end.

Компилятор: Free Pascal Compiler 2.6.2

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

Ответ:

Ариэль1606

08.10.2020 23:00

//PascalABC.NET версия 3.4.0.1677 от 17.06.18

//Если программа не запускается, то обновите версию

begin

var а := ReadReal('а=');

var б := ReadReal('б=');

PrintLn((а*а+б*б)/б*б);

end.

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

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

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