Если число делится на 3 и на 5, то оно делится и на их произведение, т.е. на 15.
<u>PascalABC.NET 3.3.5, сборка 1660 от 20.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var n:=ReadInteger('Введите натуральное число:');
if n mod 15=0 then Writeln('Число делится на 3 и 5 одновременно')
else Writeln('Число не делится на 3 и 5 одновременно')
end.
<u>Пример</u>
Введите натуральное число: 1115
Число не делится на 3 и 5 одновременно
1.
var
Hero:string;
begin
writeln('Введите имя вашего любимого киногероя: ');
readln(Hero);
writeln('Ваш любимый киногерой: ', Hero, '!');
end.
2.
k:=3; m:=k+1; → m:=3+1; // m = 4;
k:=m*m+5; → k:= 4*4+5; //k = 21;
k:= k-10; → k:= 21-10; // k = 11;
Нам надо было найти значение, хранящееся в переменной m: m = 4.
При любом x, кроме 5, это выражение истинно, поскольку истинно выражение
НЕ (х=5), после чего, по свойствам операции ИЛИ, второе выражение уже
не важно. Подставляем единственное значение, которое может подходить:
x=5. НЕ (х=5) - ложно, (x>6) - также ложно, значит, и все выражение
также ложно.
Ответ: номер 2.
1. Машина. Сколько машин существуют на свете? Оооочень много.
2. Береза. Тот же случай
6. Операционная система. Это не личное название, поэтому оно и общее.
7. Клавиатурный тренажер.
