guest246
28.02.2020 07:49

4. Какие разделы есть в редакторе формул?

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
sofaaa77
02.07.2021 00:54
Программа:
a = input("Введите текущую координату фигуры(вертикаль): ")
b = input("Введите текущую координату фигуры(горизонталь): ")
c = input("Введите координату для хода(вертикаль): ")
d = input("Введите координату для хода(горизонталь): ")
# Условие
if (a==c) and (b==c):
#Конец условия
     print("Фигура может сделать ход")
else:
     print("Фигура НЕ может сделать ход")
Условия:
а) if (a==c) and (b==c): #ладья
б) if abs(a-c) == abs(b-d): #слон
в) if abs(a-c)==1 or abs(b-d)==1: #король
г) if abs(a-c) == abs(b-d) or a == c or b == d: #ферзь
ж) if((abs(abs(a-c)-2)<0.5) and (abs(abs(b-d)-1)<0.5)
        or (abs(abs(a-c)-1)<0.5) and (abs(abs(b-d)-2.0)<0.5)): #конь
0,0(0 оценок)
Ответ:
innagavr
02.06.2022 12:58

Составил тебе только программу. Для блок-схемы создавай отдельную тему.

const

 a = 3.14;

 b = -7.8;

 n = 15;

 x: array[1..n] of real = (12.37, 16.55, 2.43, 0.81, 0.32, 1.345, -12.18, 0.15, -4.314, 1.29, 54.38, 0.214, -3.837, 0.918, -75.014);

var

 i, k: integer;

 p: real;

begin

 k := 0;

 p := 1;

 for i:=1 to n do

   if (x[i]>0) and (x[i]>b) then

   begin

     p := p * x[i];

     inc(k);

   end;

 if k = 0 then writeln('Нет искомых элементов в массиве')

 else writeln('Количество искомых элементов: ',k,'; их произведение = ',p:0:3);

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота