19 пожалуйста как надо сделать. ....

0 голосов
38 просмотров

19 пожалуйста как надо сделать. ....


image

Информатика (65 баллов) | 38 просмотров
Дан 1 ответ
0 голосов

ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Приём;

ПЕР
  x, y, R: ВЕЩ;

УКАЗ
  x := Приём.Число();
  Вывод.Цепь("^");
  y := Приём.Число();
  R := 123;
  ЕСЛИ x * x + y * y <= R * R ТО<br>    Вывод.Цепь("^Точка попадает.")
  ИНАЧЕ
    Вывод.Цепь("^Точка не попадает.")
  КОН

КОН Задание.

0

фейсбук?

0

Нет, "соц. сетями" не пользуюсь. Спрашивай тут.

0

у меня ещё два вопросы есть пожалуйста

0

Ну говори.

0

хорошо я пишу

0

1. в заданном тексте заменить все буквы "а" на букву "о".

0

Ну оформи как задание, там напишу.

0

2. дано строка S и число N. преобразовать строку S в строку длины N следующим образом : если длина строки S больше N , то от бросить первые символы, если длина строки S меньше N , то все начала добавить символы "." ( точка).

0

?.

0

здравствуйте