Var x, y: real; begin x : = -5; writeln(' x y '); while x < = 5 do begin y : = 5 - x*x/2; writeln(x: 4: 1,' | ',y: 5: 2); x : = x + 0.5 end; end. : из цикла while в цикл for
117
236
Ответы на вопрос:
ответ:
вот код
объяснение:
program pr2(output);
var x,y: real;
var i: integer;
begin
x: =-5;
writeln(' x y ');
for i: =1 to 21 do begin
y: =5-x*x/2;
writeln(x: 4: 1,'|',y: 5: 2);
x: =x+0.5
end;
end.
Большая наглядность, возможность отображения динамических процессов, интерактивность
Популярно: Информатика
-
salbekov20118.07.2021 13:56
-
Sultanika21.08.2020 00:19
-
nursultan1819.02.2020 12:41
-
schapalenko06.06.2020 07:13
-
mazyrovavlada21.02.2020 14:07
-
Мирамкуль110.10.2021 05:02
-
nutadobrenkaya02.05.2020 02:57
-
Rm029.10.2021 15:39
-
Abbabon03.12.2021 20:42
-
elinanagimova22.03.2023 09:46