Ответы на вопрос:
Var a,b: integer; begin readln(a,b); writeln((a*a+b*b)/(b*b)); end. компилятор: free pascal compiler 2.6.2
//pascalabc.net версия 3.4.0.1677 от 17.06.18
//если программа не запускается, то обновите версию
begin
var а : = readreal('а=');
var б : = readreal('б=');
println((а*а+б*б)/б*б);
end.
Устройство ввода оно может вводить отдельное слово, строку, страницу или весь текст
Популярно: Информатика
-
Папкинапапка22229.08.2020 03:54
-
zofiaoxd1zb23.01.2021 14:26
-
ivankasranka206.09.2020 15:31
-
eandrukova56714.07.2020 06:53
-
Oksana9111113.10.2020 22:54
-
scapper24.09.2022 02:36
-
fvgfds08.04.2021 23:32
-
Diman4ik35512.12.2022 03:38
-
sematom29.06.2020 05:17
-
cazuncko201622.09.2021 14:03