8. как будет выполняться фрагмент кода, с форматом вещественных чисел ? x: =0.01 пока x не равно 1.00 вывод(x) x: =x+0.01 конец цикла
161
416
Ответы на вопрос:
Var x: real; begin x: =0,01; while x< > 100 do begin writeln(x); x: =x+0,01; end; end. ну выходит так что пока x < 100 выполняется цикл и операторы которые находятся в цикле
Program abc; uses crt; var a,b,c: integer; begin; writeln('введите три числа'); readln(a,b,c); writeln('сумма введеных чисел равна ',a+b+c); end.
Популярно: Информатика
-
matyusha4710.03.2020 04:33
-
katemcgrat22.01.2023 16:44
-
lizo4eek09.08.2020 00:53
-
vhbhvgh24.03.2022 04:30
-
aleksandr789909.03.2021 15:49
-
smolich26.11.2022 10:57
-
евген11507.07.2020 08:14
-
natalia0406200105.10.2022 18:32
-
novkristinaa05.07.2022 07:41
-
ХозяинНосочков11.02.2021 23:46