Составьте 2 или 4 загадки на тему "безопастный интернет".с ответами. заранее
280
397
Ответы на вопрос:
1 .
uses crt; var a, b : real; beginreadln (a, b); writeln (a/b); writeln (frac(a/b)); writeln (int(a/b)); writeln (round(a/b)); readkey; end.
2 .
uses crt; var a: integer; st, st1, st2, st3: string; beginreadln (a); str (a, st); st1: =st[3]; st2: = st[2]; st3: = st[1]; st: = st1+st2+st3; writeln (st); readkey; end.
Популярно: Информатика
-
thewinterstale13.03.2021 01:27
-
francyz1984120.08.2021 01:39
-
biyubiyu15.10.2021 18:53
-
karinanazarenkoAnna29.12.2021 07:21
-
milanskab2321.01.2023 22:27
-
Hdzf200204.12.2020 12:38
-
кэтлин200531.03.2022 09:10
-
Kseiaa07.03.2023 20:53
-
Meluran15.05.2021 17:08
-
Kristina23848521.05.2020 13:19