Найдите ошибку, выдает несколько ответов program abc; var a, b: real; begin writeln('найти длину не занятой части отрезка a'); write('a= '); readln(a); write('b= '); readln(b); while (a-b) > =0 do begin a: = a-b; writeln('длина не занятой части отрезка а= ', a ); end; end. найти длину не занятой части отрезка a a= 34.72 b= 8.95 длина не занятой части отрезка а= 25.77 длина не занятой части отрезка а= 16.82 длина не занятой части отрезка а= 7.87

соня13101 соня13101    3   25.07.2019 01:00    0

Ответы
nabiullinnazim nabiullinnazim  03.10.2020 12:10
End;
writeln('Длина не занятой части отрезка А= ', A );
end.

поменять в конце end; с writeln
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика