Необходимо написать программу в PascalABC, переводящую градусы по Фаренгейту в градусы по Цельсии (использовать условие - F = C * 1,8 + 32). Для переменных использовать "Real" вместо "Integer". Ниже прикреплю программу, получившуюся у меня (она, конечно, неверная). Задание оценивается в Program qq;
Uses crt;
Var F, C: Real;
Begin
Writeln ('Сколько градусов по Фаренгейту?');
Readln (F);
C:= F-32 div 2;
Writeln (',C, градусов Цельсия');
end.
246
422
Ответы на вопрос:
окей, я тебе программу, но только на с++ из-за неточности в языка программирования.
#include < iostream>
void main(void) { short _array[10]; for(int i = 0; i< =9; i++) { _array[i] = rand()%40-30; } system("pause > nul"); }
Популярно: Информатика
-
Filomena0w017.04.2023 00:30
-
valyapro9925.02.2023 06:18
-
Novikovavera8118.05.2021 15:17
-
арбуз3028.11.2022 16:33
-
shkola5610.02.2021 19:56
-
Lerysik0008.09.2022 02:57
-
малый603.05.2021 17:23
-
AshesSpy19.06.2020 18:19
-
Коцюрбей19.08.2021 09:20
-
aellazhumashovа21.10.2020 12:42