Трэкбол (но сейчас их называют тэчпэдом)
<h2>Ошибка</h2>
Знак "больше или равно" пишется в том же порядке, что и читается
Сначала знак больше потом равно
" >= "
<h2>Исправление ошибки</h2>
Заменить 16 строку " if(D=>0) then "
На " if(D>=0) then "
Алг Треуг
нач
поднять перо
сместиться на вектор (1,1)
опустить перо
сместиться на вектор (2,4)
сместиться на вектор (2,-4)
сместиться на вектор (2,4)
сместиться на вектор (2,-4)
сместиться на вектор (-8,0)
поднять перо
сместиться на вектор (2,4)
опустить перо
сместиться на вектор (4,0)
поднять перо
кон
Написано на Pascal
var a:real;i,k:integer;
begin
writeln('Введите 3 числа');
for i:=1 to 3 do
begin
read(a);
if (a>=2.5) and (a<=5.2) then begin
writeln('Число ',a,' входит в интервал');
k:=k+1;
end;
end;
if k=0 then writeln('Таких чисел нет');
end.<span>
</span>