Информатика Предыдущий вопрос Следующий вопрос Составить программу перевода градусов Цельсия в Градусы Фаренгейта от a до b ,a>b, вывод организовать в столбцы язык паскаль sasha3045 1 год назад
Информатика Предыдущий вопрос Следующий вопрос Составить программу перевода градусов Цельсия в Градусы Фаренгейта от a до b ,a>b, вывод организовать в столбцы язык паскаль sasha3045 1 год назад
Ответ Ответ дан KnowsUser1 Ответ:### 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.Объяснение:
Ответ Ответ дан informatik30 Ответ:Varn:integer;BeginWriteln('Введите в градусах Цельсия)Read(n)Writeln('В Франгейтай это = ',(n*9/5)+32:0:1);endещё совет лучше перепиши вручную, не копируй!так как тут другой шрифти ещё можно так;f:=(n*9/5)+32 а потом Writeln(f:0:1);end