uses crt;
var ch,a:integer;
begin
readln(ch);
readln(A);
if ((ch div 10)+( ch mod 10)) mod a = 0 then
writeln('YES') else writeln('NO');
readln;
end.
2.
uses crt;
var i,os:integer;
a:array[1..31] of integer;
begin
randomize;
os:=0;
for i:=1 to 31 do
begin
a[i]:=random(5)+0;
if a[i]=0 then inc(os);
end;
for i:=1 to 31 do
write(a[i],' ');
writeln;
if os = 10 then
writeln('YES') else writeln('NO');
readln;
end.
Тут, во-первых, не понятно о каких именно таблицах идет речь
Для таблиц баз данных:
1) Строка называется записью и может удаляться. Столбец называется колонка и может удаляться. Ячейка (поле) по сути сама по себе удаляться не может, но может быть очищена от данных или содержать данные по умолчанию
2) Строка(несколько вариантов), целое(несколько вариант), с плавающей запятой (несколько вариантов), логического типа, дата, дата-время, время и двоичные данные или blob
Для электронных таблиц типа Excel:
1) Столбцы, строки и ячейки могут быть удалены. При удалении отдельной ячейки выбирается, как именно должны быть смещены данные
2) строка, ссылка, гиперссылка, целое число, дробное число, проценты, денежные единицы, дата, дата-время, время, формула. Так же ячейка может содержать дополнительные данные типа личного имени, комментария, форматирование, цвет фона и тд
<span>& - амперсанд, логическое умножение. 1*1 = 1, 1*0=0
v - логическое сложение. 1+1 = 1, 1+0 = 0, 0+0 = 0
</span>((1 & 1)v 0) & (0v 1) = ((1 * 1) + 0) * (0 + 1) = 1
((0 & 0)v0) & (1 v 1) = <span>((0 * 0) +0) * (1 + 1) = 1</span>
1)4 ( 38 символов каждый по 16 бит будет 608 бит)
2)3 ( 9кбайт = 9*1024*8 бит, т.е строк будет (9*1024*8)/ (6*48*8) = 32 )
3)4 ( 4 < 5 и 4>=4 )
4)3 ( 23 <100 и 23 не четное )
5)1 ( Путь A-B-E-C )
6)1 ( ну тут мне реально лень писать вроде итак очевидно :3 )
Вроде так ⊙_ರೃ
Летающий автобус)
1. Мест в эконом-классе 120, а в бизнес-классе 40.
2. 100 процентов прибыли получим, если заполним все места. Билет в эконом-классе стоит в 2 раза меньше чем X. Получаем следующее уравнение:
40*X + 0.5*120*X = 100%, X = 1% от всей прибыли. Значит один билет в бизнес - классе приносит один процент прибыли. А один билет в эконом-классе приносит 0.5 процента прибыли.
3. Осталось рассчитать прибыль компании учитывая непроданные билеты:
P = 100 - b - 0.5*a и написать программу:
var a,b:integer;
begin
repeat
writeln('Введите количество непроданных билетов (a,b)');
readln(a,b);
until (a<=120) and (b<=40)and (a>=0) and (b>=0);
writeln('Прибыль компании составит ',100-b-0.5*a,'%');
end.