Предмет: Информатика,
автор: sasha3045
Составить программу перевода градусов Цельсия в Градусы Фаренгейта от a до b ,a>b, вывод организовать в столбцы
язык паскаль
Ответы
Автор ответа:
0
Ответ:
### PascalABC.NET ###
function Tofahrenheit(cels_deg:integer):= cels_deg * 1.8 + 32;
begin
var (a, b) := ReadInteger2('a, b: ');
Range(a, b).Tabulate(x -> Tofahrenheit(x)).Println;
end.
Объяснение:
Автор ответа:
0
Ответ:
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
Похожие вопросы
Предмет: Русский язык,
автор: Katya1997Glusk
Предмет: Английский язык,
автор: Снежана1996
Предмет: Английский язык,
автор: KiSs16RaIn
Предмет: География,
автор: diania5pivko
Предмет: Литература,
автор: milashkavbilim