Предмет: Информатика,
автор: anna7685
Решите пожалуйста.......................
Приложения:
Ответы
Автор ответа:
0
1.
CLS
INPUT n
sum=0
FOR i=1 to n
sum=sum+(i+1)/(i+2);
NEXT i
PRINT sum
2.
CLS
SCREEN 7;
X1=100;X2=50;X3=150;
Y1=200;Y2=300;
FOR i = 1 TO 5
LINE(X1, Y1)-(X2, Y2);
LINE(X2, Y2)-(X3, Y2);
LINE(X3, Y2)-(X1, Y1);
X1=X1+150; X2=X2+150;X3=X3+150;
NEXT i;
END
CLS
INPUT n
sum=0
FOR i=1 to n
sum=sum+(i+1)/(i+2);
NEXT i
PRINT sum
2.
CLS
SCREEN 7;
X1=100;X2=50;X3=150;
Y1=200;Y2=300;
FOR i = 1 TO 5
LINE(X1, Y1)-(X2, Y2);
LINE(X2, Y2)-(X3, Y2);
LINE(X3, Y2)-(X1, Y1);
X1=X1+150; X2=X2+150;X3=X3+150;
NEXT i;
END
Похожие вопросы
Предмет: Английский язык,
автор: biliiailih
Предмет: Алгебра,
автор: 5yalov830
Предмет: Математика,
автор: masha1472
Предмет: Литература,
автор: veronikasu2011