Помогите с заданием
1.
a:=10
b:=4
b:=200-a*b
a:=b/20*a
2.
car s, k: integer;
begin
s:=60;
for k:=1 to 8 do
s:=s-4;
write (s );
end.
Ответа на этот вопрос пока нет. Попробуйте найти его через форму поиска.
Вас заинтересует
1 год назад
1 год назад
2 года назад
2 года назад
8 лет назад
8 лет назад