Блок-схема к Паскалю
помогите составить блок схему к паскалю!!!
Var P:Extended; i,x:Byte; Begin P:=1; Write('x= '); Readln(x); For i:=2 to x do P:=P*i; Writeln(P:0:0); Readln End. |
Цитата:
|
Часовой пояс GMT +4, время: 12:13. |
Powered by vBulletin® Version 4.5.3
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.