Возможно:
1.Графический процессор
2.Видеоконтроллер
3.Видеопамять
4.Цифро-аналоговый преобразователь
5.Видео-ПЗУ
6.Система охлаждения
Var
S, tmp: real;
n, i: integer;
begin
write('Введите n:');
readln(n);
for i := 1 to n do
begin
tmp := 1 / ((2 * i + 1) * 3);
S := S + tmp;
end;
writeln(S:8:10);
readln;
end.
Ответ:
3 элемента "И": 1- (А и В), 2- (С и В), 3- выходы 1 и 2
В разветвляется на входы 1 и 2
Program pony;
var
a, b: string;
i: integer;
begin
Write('введите строку: '); Readln(a);
Write('введите сочетание: '); Readln(b);
for i := length(a) downto 1 do
if a[i] = 'о' then insert(b, a, i + 1);
Writeln(a)
end.
<u>Тестовое решение:</u>
введите строку: Дает корова молоко
введите сочетание: 12345
Дает ко12345ро12345ва мо12345ло12345ко12345