ответьте на во зарание А1
К графическим редакторам относится программа: *
PowerPoint
Paint
Блокнот
WordPad
А2
Продолжите ряд: микрофон, сканер, мышь,... *
Системный блок
Принтер
Монитор
Клавиатура
А3
Продолжите ряд: прямоугольник, эллипс, скруглённый многоугольник,... *
Трапеция
Треугольник
Многоугольник
Круг
А4
Укажите какой вид информации лишний: *
Числовая
Графическая
Буквенная
Текстовая
Закончите предложе
А5
Закончите предложение:«Кодом называется...» *
Набор цифр
Алфавит
Переход от одной формы представления информации к другой
Система условных знаков для представления информации
А6
Какая единица измерения информации является наибольшей? *
Килобайт
Гигабайт
Байт
Мегабайт

  вот первая программа. вторую сейчас пишу.

program p_1; var a,b: string; i,k: integer; begin k: =0; write('введите слово '); readln(a); write('введите символ '); readln(b); for i: =1 to length(a) do begin if a[i]=b then k: =k+1; if a[i]=b then writeln(i,' '); end; if k> =1 then writeln('да, встречается ',k,' раз, на позиции указанных сверху в столбик ')else writeln('нет'); end.

пщояк 17 27 16 33 17

нщёп 15 27 7 17

1. (a+b+c)& (неa& b& неc)= a& неa& b& неc+b& неa& b& неc+c& неa& b& неc=0+неa& b& неc+0=неa& b& неc2. (a+b)& (неb+a)& (неc+b)=(a& неb+a& a+b& неb+b& a)& (неc+b)= (a& неb+a+0+b& a)& (неc+b)= (a& неb+a+b& a)& (неc+b)=a& неb& неc+a& неb& b+a& неc+a& b+b& a& неc+b& a*b= a& неb& неc+0+a& неc+b& a& неc+a& b+a& b=a& неb& неc+a& неc+b& a& неc+a& b=a& неc(b+1)+ a& b& (неc+1)=a& неc+a& b= a& (неc+b)3. (1+(a+b))+((a+c)& 1)=1+((a+c)& 1)= 1+(a& 1+c& 1)= 1+a+c=14. (a& b& неc)+(a& b& c)+не(a+b)= (a& b& неc)+(a& b& c)+неa& неb= (a& b)& (неc+c)+неa& неb=a& b+неa& неb= a~b5. (a+b+c)& не(a+неb+c)= (a+b+c)& неa& b& неc=a& неa& b& неc+b& неa& b& неc+c& неa& b& неc=0+неa& b& неc+0=неa& b& неc

у меня тоже даша получилось))