М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
мирби1
мирби1
13.07.2022 16:07 •  Информатика

Решить в паскале с операторов while и repeat 1) вывести на экран все четные числа из диапазона от a до в, кратные трём (а< =в) 2) вывести на экран все двузначные числа в которых старшая цифра отличается от младшей не больше, чем на 1

👇
Ответ:
Kristino4kaMiy
Kristino4kaMiy
13.07.2022
1. read(a);
      read (b);
         while (a<=b)
            begin;
          if ((a mod 2 =0) and (a mod 3 =0)) or ((b mod 2=0) and (b mod 3 =0)) then
 begin;
write (a)
     else 
 if (b mod 2=0) and (b mod 4=0) then      
   write (b)
      else 
  end;
readkey;     
end.

второе прости могу только на си
4,4(45 оценок)
Открыть все ответы
Ответ:
AlviaSil
AlviaSil
13.07.2022

1)

program z1;

var x,y: integer;

begin

write ('x = ');

readln (x);

write ('y = ');

readln (y);

if (y>0) and (x*x+y*y<4) then writeln('Точка попадает в синюю область')

else writeln('Точка не попадает в синюю область')

end.

2)

program z1;

var x,y: integer;

begin

write ('x = ');

readln (x);

write ('y = ');

readln (y);

if (x<0) and(y<0) and (x*x+y*y<5) then writeln('Точка попадает в синюю область')

else writeln('Точка не попадает в синюю область')

end.

Объяснение:

Проекции точки на оси x и y являются катетами прямоугольного треугольника. Гипотенуза - расстояние от начала координат до точки.

Чтобы точка принадлежала кругу расстояние до точки должно быть меньше радиуса.

Поскольку здесь половина и четверть круга, добавляем ограничения по х и у.

4,6(78 оценок)
Ответ:
Dasha170105
Dasha170105
13.07.2022

Ақпарат (лат. informatio — түсіндіру, мазмұндау) ұғымы күнделікті өмірден бастап техникалық салада пайдаланылатын көп мағыналы ұғым. Жалпы алғанда бұл ұғым шектеу, байланыс, бақылау, форма, инструкция, білiм, мағына, құрылым, бейнелеу, сезіну тағы басқа ұғымдармен тығыз байланысты. Көп адам бұл жайлы Білім дәуірі немесе білім қоғамы тудырған Ақпарат дәуірі туралы айта бастады; ақпараттық қоғам, ақпараттық технологиялар, тіпті информатика, ақпарат ғылымы және компьютер ғылымы назарға көп түсуде, ал “ақпарат” сөзі білдіре бастаған мағыналары ұқыпсыз пайдаланылуда.[1]

4,6(1 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ