A:array[1..10] of integer;
b, d:array[1..10] of string;
c:array[1..10] of string;
m, n, i, k, t :integer;
begin
for i:=1 to 10 do
readln(a[i]);
readln(b[i]);
readln(c[i]);
t:=1;
for i:=1 to 10 do
if (2014-a[i])>65 then begin d[t]:=b[i]; t:=t+1; end;
for i:=1 to 10 do
if c[i]='м' then m:=m+1
else n:=n+1;
m:=m\10*100;
n:=n\10*100;
for i:=1 to t do
writeln(d[i]);
writeln(n);
writeln(m);
readln;
end.
Первый вопрос:
<span>Ресурс — это
Ответ:
</span><span>запас, источник чего-нибудь
</span>
Второй вопрос:
<span>Массивы документов с зафиксированной на ней информацией называются
Ответ:
</span><span>информационными ресурсами
</span>
Третий вопрос:
<span>Закон, принятый в 2015 г., называется…
Ответ:
</span><span>«Об информации, информатизации и защите информации»</span><span>
</span>
1. s= 4, i=2
5,3
6,4
7,5
8,6
выводит 68
2. остаток от деления а=8 на 3 равен 2 и целая часть от деления а на 3 равна 2
выводит 64(а*а)
3. a=15(4ая строчка вычисления)
а больше 10 с=30(хотя в любом случае было бы 30 при а =15)
Нужно взять книгу с полки и приступить к чтению)
Т.е ты будешь получать информацию => книга - источник