Привет! Меня зовут Кристина. я скопировала из научного сайта определение:
<span>
Актуальная информация - это данные, находящиеся в состоянии, которое соответствует действительности.
</span>
А ели по простому, то:
Актуальная информация - это информация, ценная в данный момент.
Пока
Была рада помочь
Начало: D:\ДОКУМЕНТЫ\ФОТО\2011\ВЕСНА
После поднятия на 3 уровня вверх: D:\ДОКУМЕНТЫ\
После спуска в ИНФОРМАТИКА: <span>D:\ДОКУМЕНТЫ\ЭКЗАМЕН\ИНФОРМАТИКА
Ответ: 3</span>
program dz8;
uses crt;
var a:array [1..5,1..5] of integer;
i,j,s:integer;
Begin
TextColor(Green);
//Заполнение и вывод массива
for i:=1 to 5 do
begin
for j:=1 to 5 do
begin
a[i,j]:=random(21)-10;
write(a[i, j]:4);
end;
writeln;
end;
writeln;
//Подсчет и вывод суммы каждой строки
for i := 1 to 5 do
begin
s := 0;
for j := 1 to 5 do
s := s + a[i, j];
writeln('Сумма ', i, ' строки = ', s);
end;
writeln;
end.
Вроде бы так... подправь если что)
uses crt;
const N=10;
var i,p:integer; a:array[1..N] of integer; {кол эл массива }
begin
p:=0;
writeln('введите исходный массив');
for i:=1 to N do {цикл по кол э}
begin
write('a[',i,']='); readln(a[i]); {ввод эл массива}
if (a[i] mod 2)=0 then p:=p+1;
end;
write('p='); writeln(p);
readln
end.