golicinskaya
14.09.2021 18:16

Нужно решить правельно только​


Нужно решить правельно только​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
egor2002browhnq9
09.04.2020 01:51
Какого редактора??
Напишу про пейнт

Ластик/Цветной ластик – стирает часть рисунка при нажатии левой кнопки мыши или заменяет основной цвет на фоновый при нажатии правой.

 Заливка – заполняет цветом одноцветную область рисунка.

 Выбор цвета – определяет цвет фрагмента при выполнении на нем щелчка и устанавливает его в качестве основного или фонового цвета.

 Масштаб – увеличивает фрагмент рисунка.

 Карандаш – рисует как обычный карандаш при нажатой левой или правой кнопкой мыши.

 Кисть – используется как карандаш, но рисует более толстыми линиями, форма кисти может выбираться.

 Распылитель – распыляет краску при нажатой левой или правой кнопкой мыши.

 Линия – проводит прямую линию при нажатой левой кнопке мыши (удерживая клавишу Shift, можно получить линию строго вертикальную, горизонтальную линию или под углом 45o).

 Кривая – рисует прямую линию, которую затем можно изгибать 2 раза, отводя мышь в сторону от рисунка.

 Прямоугольник – создает прямоугольник или квадрат (удерживая Shift) путем протаскивания мыши с нажатой левой кнопкой.

 Скругленный прямоугольник – то же, что и прямоугольник, но углы скруглены.

 Эллипс – рисует овалы и круги (удерживая Shift).

 Многоугольник – для рисования многоугольника необходимо щелкать в каждой его вершине, а в последней – дважды.

0,0(0 оценок)
Ответ:
Эльнуи
17.05.2022 11:45
1)
Program lapy;
var lapy:integer;
Begin
  Writeln('Сколько лап?');
  Readln(lapy);
  If lapy=0 then Writeln('Это рыба');
  if lapy=2 hten Writeln('Это птица');
  if lapy=4 then Writeln('Это лось');
  if lapy=6 then Writeln('Это жук');
  if lapy=8 then Writeln('Это паук');
end.
2)
Program kinotheatr;
var mesto:integer;
Begin
  Writel('Укажите Ваше место:');
  Readln(mesto);
  if (mesto>=1) and (mesto<=10) then Writeln('Цена 150р.');
  if (mesto>=11) and (mesto<=15) then Writeln('Цена 100р.');
  if (mesto>=16) and (mesto<=20) then Writeln('Цена 75р.');
End.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота