Ответы на вопрос:
Program gt; var x1,x2,x3,y: real; begin readln(x1,x2,x3); x1: =x1-x3; while x1< x2 do begin x1: =x1+x3; if(x1< =x2)then begin y: =x1*x1*x1+3; writeln(y); end; end; end.
Популярно: Информатика
-
69Unicorn6931.05.2023 02:42
-
katttty998902.04.2020 00:29
-
гиений150909.11.2022 15:19
-
Ventana126314.05.2021 00:42
-
Александра5200608.06.2020 04:48
-
илья197212.11.2022 15:46
-
gabduhakovaari29.04.2023 14:14
-
gulyaaxundova12.07.2020 23:39
-
zhasmin77712317.01.2020 08:25
-
Starfire23431.12.2021 07:53