Помогите с программированием, работа с паскаль abc
Помогите с программированием, работа с паскаль abc
Гость
Ответ(ы) на вопрос:
Гостьvar a,k: real;
begin
while k<15 do begin
k:=k+1;
a:=(64-(k*4))/2;
writeln(k,' ',a);
end;
end.
Не нашли ответ?
Похожие вопросы