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

Pascal напишите все условия только с пробелами со скобками где написать условие проверки числа n, что оно является нечетным и кратным 3. написать условие проверки целого числа n, что оно 345 < =n< 543 или кратно 7. написать условие проверки числа n, что оно кратно 3 или заканчивается на 0. написать условие проверки целого числа n, что оно 231 < =n< 312 и не кратно 3. написать условие проверки числа n, что оно является нечетным и количество десятков в нем не больше 5. написать условие проверки натурального числа n, что оно двузначное и является палиндромом. написать условие проверки числа n, что оно оканчивается на 4 и количество сотен в нем больше 3. написать условие проверки натурального числа n, что оно двузначное и начинается на нечетную цифру. написать условие проверки числа n, что оно является четным и количество десятков в нем больше 5. написать условие проверки числа n, что оно трехзначное и начинается на 8. даны два целых числа а и b. написать условие для проверки того, что среди чисел а и b есть четное число. даны два целых числа а и b. написать условие для проверки того, что сумма чисел а и b больше 56 и меньше 145. даны два целых числа а и b. написать условие для проверки того, что оба числа а и b заканчиваются на 6. даны два целых числа а и b. написать условие для проверки того, что число а положительное и число b двузначное. даны два целых числа а и b. написать условие для проверки того, что десятки числа а меньше 5 или сотни числа b больше 3. даны два целых числа а и b. написать условие для проверки того, что число а кратно 3 или число b не кратно 5. даны два целых числа а и b. написать условие для проверки того, что число а положительное и число b неотрицательное. даны два целых числа а и b. написать условие для проверки того, что хотя бы одно из чисел а и b больше 100. даны два целых числа а и b. написать условие для проверки того, что остаток от деления на 8 числа а больше 4, а остаток от деления числа b на 12 меньше 5. даны два целых числа а и b. написать условие для проверки того, что среди чисел а и b нет четных.

👇
Ответ:
DUGLASMORFINI
DUGLASMORFINI
09.02.2020

 if (N mod 2 <> 0) and (N mod 3 = 0) then

 if ((N >= 345) and (N < 543)) or (N mod 7 = 0) then

 if (N mod 3 = 0) or (N mod 10 = 0) then

 if (N >= 231) and (N < 312) and (N mod 3 <> 0) then

 if (N mod 2 <> 0) and (N div 10 mod 10 <= 5) then

 if (N > 9) and (N < 100) and (N mod 10 = N div 10) then

 if (N mod 10 = 4) and (N div 100 mod 10 > 3) then

 if (N > 9) and (N < 100) and (N div 10 mod 2 <> 0) then

 if (N mod 2 = 0) and (N div 10 mod 10 > 5) then

 if (N > 99) and (N < 1000) and (N div 100 = 8) then

 if (a mod 2 = 0) or (b mod 2 = 0) then

 if (a + b > 56) and (a + b < 145) then

 if (a mod 10 = 6) and (b mod 10 = 6)

 if (a > 0) and (b > 9) and (b < 100) then  

 if (a div 10 mod 10 < 5) or (b div 100 mod 10 > 3) then  

 if (a mod 3 = 0) or (b mod 5 <> 0) then

 if (a > 0) and (b >= 0) then

 if (a > 100) or (b > 100) then  

 if (a mod 8 > 4) and (b mod 12 < 5) then  

 if (a mod 2 <> 0) and (b mod 2 <> 0) then

4,8(99 оценок)
Открыть все ответы
Ответ:
Lina555510
Lina555510
09.02.2020

Под понятием «бумажный документ» мы подразумеваем информацию, зафиксированную на бумажном носителе и обладающую определенными реквизитами, такими как, например, дата, подпись. К особенностям бумажного документа можно отнести его привязку к материальному носителю.

Электронный же документ не осязаем и не имеет привычного для нас набора осязаемых реквизитов. Нет возможности потрогать, визуально его ощутить. Помимо этого электронный документ не привязан к носителю. Он может существовать на многих носителях и являться одним и тем же документом.

4,8(57 оценок)
Ответ:
девочка261
девочка261
09.02.2020
:D 
Ну го Ничего если  на паскале напишу ? 
uses crt;
var  a:array[1..50] of integer ;i,j,n,x,t,k:integer;b:string;
begin
read(n);     
for i:= 1 to n do     
begin     
a[i]:=random(15);     
write(a[i],' ');     
end;     
writeln;     
for i:= 1 to n-1 do     
for j:= i+1 to n do     
if a[i]> a[j] then begin t:=a[i]; a[i]:=a[j]; a[j]:=t; end;     
for i:= 1 to n do     
write(a[i],' ');     
writeln;     
read(x);     
for i:= 1 to n do     
 if a[i] = x then k:=k+1;     
 str(k,b);     
n:=length(b);     
 if k in  [11..19] then write (k,' раз') else     
 if k = 0 then  write('число ',x,' не встречается ')else     
case b[n] of     
 '0','1','5','6','7','8','9': write (k,' раз');     
 '3','4','2': write (k,' раза') ;     
end;
end.
4,6(32 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ