Средний возраст (x+y)/2
возраст тани отличается |(x+y)/2-x|
возраст мити отличается|(x+y)/2-y|
главное про модул не забудь, а то может быть возраст с минусом)
Var
i, j, n, min: integer;
v: array[1..8]of integer;
p: array[1..8]of integer;
s: array[1..8]of integer;
begin
min := 999;
for i := 1 to 8 do read(v[i]);
for i := 1 to 8 do read(p[i]);
for i := 1 to 8 do read(s[i]);
for i := 1 to 8 do
if(p[i] = 0) and (s[i] = 1) and (v[i] < min) then min := v[i];
write(min);
end.
Пример:
Входные данные:
22 19 40 33 34 23 45 23
1 0 0 1 1 0 1 0
0 1 1 0 0 1 1 0
Выходные данные:
19
Var n, i, k:integer;
begin;
readln(n);
for i:=100 to 999 do
if (i mod 10) + (i div 100) + (i div 10 mod 10) = n then begin;
writeln(i);
k:=k+1;
end;
writeln(k);
end.
Хотя бы правильно написали ответ! Он пишется так: "представьте в байтах, Кбайтах, Мбайтах"
<span>
На каждой странице 40 х 50 = 20 000 символов. В рассказе 5 страниц, значит он содержит 5 х 20
000 = 100 000 символов. Один символ
несет один байт информации. Следовательно, объем всей информации в рассказе 100 000 байт; 2) 100 000 /1024 = = 97,65625 Кбайт; 3) 97,65625 / 1024 =
0,095367431640625 Мбайт.</span>