(в паскале.) в строке символов имеются буквы а и в. определите, какая буква встретится раньше, если просматривать символы слева направо.

Var st: string; i: byte; begin readin(st); for i: =1 to length(st) do   if st[i] = 'a'  then   begin   write('а встретилась раньше');   break; end else     if st[i] = 'b' then begin write('b встретилась раньше'); break; end; end.

теперь не плагиат

program pr; var c: integer; beginwriteln('введите число с'); readln(c); writeln('остаток от целочисленного деления числа ',c,' на 10 в квадрате равен ',sqr(c mod 10)); end.

стены, ученики, террористы(учителя : d), парты ии т.д.

разрушить : d,