Даны два числа. если хотя бы одно из них кратно 4, то второе увеличить на 3. это в паскале. в принципе все понятно, но у меня не получается написать, что хотя бы одно из них кратно. , 21 .

PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018Внимание! Если программа не работает, обновите версию!

begin

 var (a, b) := ReadInteger2;

 if (a mod 4 = 0) or (b mod 4 = 0) then b += 3;

 Println(a, b)

end.

Числа можно ввести оба через пробел или по одному

Чтобы проверить, кратно ли число четырём, нужно написать такую проверку:

if (х mod 4 = 0) then...

Это значит: "если остаток от деления числа х на 4 равен нулю, то..."

Программа:

Program P;

var

 x,y: integer;

begin

 var s:=' -=Alphaeus=- ';  

 for var k:=1 to 22 do begin write(s[k]); sleep(47) end;

 writeln;writeln;

 writeln('Введите числа:');

 write('X = '); readln(x);

 write('Y = '); readln(y);

 if (x mod 4=0) or (y mod 4=0) then y:=y+3;  

 writeln('Результат:');

 writeln('X = ',x);

 writeln('Y = ',y);

end.

ответ: ок я програмист со стажем

Объяснение:

user = "імя"

action = "школа"

 

log_message = 'Пользователь {} зашел на сайт и выполнил действие: {}'.format(

   user,

   action

)

 

print(log_message)

# Пользователь імя зашел на сайт и выполнил действие: школа

from dataclasses import dataclass

 

@dataclass

class Armor:

   armor: float

   description: str

   level: int = 1

   

   def power(self) -> float:

       return self.armor * self.level

   

armor = Armor(5.2, "Common armor.", 2)

armor.power()

# 10.4

 

print(armor)

# Armor(armor=5.2, description='Common armor.', level=2)

A - Аня, b - Боря, v - Вася, g - Галя, d - Даша, i - Иван.
a>b, v>g, d<i, v<a, d>b;
Мы знаем, что а>b, значит ,что b<v;
Мы знаем, что d>b, значит ,что b<i;
Мы знаем, что v>g и v<a, значит ,что b<v;
Следовательно мы нашли обладателя меньшей флешки. Им стал Боря.
Раз b самый меньший, то в дальнейших расчетах его можно не использовать.
Мы знаем, что a>v, а это значит ,что a>g т.к. v>g !
Мы знаем, что i>d и что d>b, а отношения a к i из условия найти нельзя... Поэтому обладателем самой большой флешки может быть как и Аня так и Иван.