Ответы на вопрос:
Var
n:integer;
Begin
Writeln('Введите в градусах Цельсия)
Read(n)
Writeln('В Франгейтай это = ',
(n*9/5)+32:0:1);
end
ещё совет лучше перепиши вручную, не копируй!
так как тут другой шрифт
и ещё можно так;
f:=(n*9/5)+32 а потом Writeln(f:0:1);
end
Популярно: Информатика
-
maruha300809.04.2021 20:52
-
Alina10496923.05.2020 19:07
-
110206ma02.12.2021 14:20
-
Артур1505150514.10.2020 02:10
-
DOMINOSHKAWWWRU23.06.2020 07:53
-
TANIAMIRNAI29.03.2023 07:10
-
mihaill198816.01.2022 09:52
-
GoshaLLL11.05.2021 16:31
-
Anara201727.02.2021 20:26
-
SanyaVetka02.04.2023 12:09