СОР № 1 Информатика 10ЕМН класс Жолдармен жұмыс жасау

Жолдармен жұмыс жасау

Задание:

X және Y бүтін сандары мен S1 және S2 жолдық қатарлары берілген. S1 жолдық қатарының алғашқы X символынан және S2 жолдық қатарының соңғы Y символынан тұратын жаңа жолдық қатарлар құрыңыз және экранға шығарыңыз

Решение:

Program y-tabu;

Var  x , y : real ;

Begin

X:=-1;

Repeat

Y: = 3*x+1;

WriteLn (‘ y = ‘ , y);

X:=X+0,5.

Until x>2;

End.