Составить слова из букв о носителях информации амнкеь- ппрсиау- секдиад- агубам- чевистерн-
280
324
Ответы на вопрос:
// pascalabc.net 3.0, сборка 1111 begin var p: =1.0; var a: =6.7; repeat p*=a; a+=0.4 until a> 7.8; writeln(p) end. // pascalabc.net 3.0, сборка 1111 begin var s: =0.0; var p: =1.0; var a: =8.5; repeat s+=a; a+=0.1 until a> 40.9; a: =1; repeat p*=a; a+=0.25 until a> 3; if s> p then writeln('сумма больше произведения') else if p> s then writeln('произведение больше суммы') else writeln('сумма и произведение равны') end. begin writeln(0.6+0.7+0.8+0.9) end.
Популярно: Информатика
-
nomerperv16.11.2022 08:05
-
Лиза4511117.08.2020 21:23
-
dariasit07.03.2022 16:50
-
Alina2315478408.07.2022 14:44
-
fcnhff711.12.2020 01:44
-
rishanaHD06.02.2023 23:51
-
Ghalachyansona11.12.2020 08:27
-
лулу3625.02.2022 00:41
-
3eбpa15.02.2023 13:17
-
Даня123322130.01.2023 11:10