Умоляю даю 50 баллов!!!! Сделать из этой блок схемы программу на языке паскаль (с русским) умоляю!!!
Приложения:
tyngpuk:
паскаль (с русским) - это как
Ответы
Ответ дал:
1
Не совсем понятно, что вы подразумевается под (с русским)
var
x,y:integer;
begin
readln(x,y);
while y<=10 do
begin
if x<=y then
begin
x:=x+1;
y:=y-1;
end
else begin
x:=x-5;
y:=y+5;
end;
end;
writeln(x,' ',y);
end.
спасибо большое
Похожие вопросы
1 год назад
2 года назад
7 лет назад
7 лет назад
9 лет назад