Первый ребус сорока
Второй ребус синица
Var a,b,c,max: Integer;
begin
writeln('Введите a,b,c');
readln(a,b,c);
max:=a;
if max<b then max:=b;
if max<c then max:=c;
writeln('Наибольшее число: ',max);
end.
//1
Var
f:text;
s,s1:string;
begin
readln(s);
assign(f,'text.txt');
reset(f);
while not Eof(f) do
read(f,s1);
close(f);
s:=s1+s;
assign(f,'text.txt');
rewrite(f);
write(f,s);
close(f);
end.
//2
Var
f:text;
s1,s2:string;
begin
assign(f,'text1.txt');
reset(f);
while not Eof(f) do
read(f,s1);
close(f);
assign(f,'text.txt');
reset(f);
while not Eof(f) do
read(f,s2);
close(f);
s1:=s1+s2;
assign(f,'text1.txt');
rewrite(f);
write(f,s1);
close(f);
end.
1)Военное дело
2)Моделирование физ. явлений и наблюдение на ними
3)<span>Обработка конкретных экспериментальных данных при проведении различных исследований
4)Решение задач метеопрогноза
5)Автоматизированные рабочие места
</span>6)<span>Автоматизированные системы планирования и управления производством
7)</span><span>Банковские и биржевые компьютерные системы
</span>8)Подготовка различных документов<span>
9)</span><span>Получение изображений внутренних частей непрозрачных тел
10)</span><span>Системы массового обслуживания и информационно-справочные системы
11)</span>Базы данных
12)<span>Аранжировка музыкальных произведений, цветомузыка
13)</span><span>Компьютерный дизайн
14)</span><span>Компьютерная мультипликация
15)</span><span>Лингвистика, расшифровка/зашифровка неизвестных языков, документов
16)</span><span>Цифровая аудио- и видеозапись
17)Компьютерная геодезия и картография
18)Средства связи</span>
Виды информации:
1. Текстовая - представленная на каком-либо из существующих языков, например, book - английский язык.
2. Числовая - представленная в виде цифр, например, 1,2,3...
3. Графическая - картины, фотографии, чертежи, схемы и т. д.
4. Звуковая - все, что слышит человек, например, человеческая речь, музыка, пение птиц.
<span>5. Видеоинформация - последовательность изображений, например, фильмы, мультфильмы.</span>