1) Тип real невозможно автоматически привести к типу integer, потому что неясно, как поступать с дробной частью - отбросить или округлить.
3) Неверна запись константы 3,5, но если записать 3.5, то допустимо.
4) Нельзя присвоить целочисленную константу строке.. Если взять ее в апострофы, т.е. написать '3', будет корректно.
Var
x, y, r: real;
begin
read(x, y, r);
if ((x >= 0) and (y >= 0) and (x * x + y * y <= r * r))
or ((x < 0) and (y < 0) and (x + y >= -r)) then
write('да')
else
write('нет');
end.
<span>для вычислительного эксперимента - графики изменений
</span>
<span>для компьютерного управления - схемы управления, блок схемы
</span>
<span>для имитационной модели - изображение модели напрмер</span>
// PascalABC.NET 3.1, сборка 1214 от 09.04.2016
begin
Write('*'*20)
end.
15360 мегабайт. Обращайся!