Это надо решить на python "гнчэ-1" – сложное электронное устройство, каждую секунду очередное число последовательности 1, 2, 2, 3, 3, 3, 4, 4, 4, 4, ввиду дороговизны электронных комплектующих вам поручено разработать эмулятор для этого устройства. входные данные дано количество секунд (от 1 до 1000000), которые работает генератор после включения. выходные данные результат работы генератора примеры входные данные 2 выходные данные 1 2 входные данные 5 выходные данные 1 2 2 3 3

S = int(input('s = '))
t=1
k=1
while k<s:
  for i in range(t):
    print(t)
  t=t+1
  k=k+t
for i in range(k-t,s):
  print(t)

Пример:
s = 5
1
2
2
3
3

 #!/usr/bin/env python
# encoding: utf-8
# (c) NaaMan

print "Генератор готов к работе"
s = int( input("Введите количество секунд: ") )
if 0 < s <= 1000000:
    t = 1
    r = 1
    for i in range(1, s + 1):
        print r,
        t += 1
        if t > r:
            r += 1
            t = 1
print "\nГенератор закончил работу"

1.
var
  s: string;
  i, count: integer;
begin
  writeln('Vvedite stroky: ');
  readln(s);
  for i := 1 to length(s) - 2 do
    if copy(s, i, 3) = 'abc' then
      count := count + 1;
  writeln('Kol-vo: ', count);
end.
2.
var
  s1, s2: string;
  i, len1, len2: integer;
begin
  writeln('Vvedite stroky 1: ');
  readln(s1);
  writeln('Vvedite stroky 2: ');
  readln(s2);
  len1 := length(s1);
  len2 := length(s2);
  if len1 > len2 then writeln('1 stroka dlinnee')
  else if len1 < len2 then writeln('2 stroka dlinnee')
  else writeln('dlini strok ravnie')
end.
3.
var
  s1, s2, s3: string;
begin
  writeln('Vvedite stroky 1: ');
  readln(s1);
  writeln('Vvedite stroky 2: ');
  readln(s2);
  s3 := s1[1] + s1[2] + s2[1] + s2[2];
  writeln('Novaja stroka: ', s3);
end.

Второе красиво решил через строки MinGW GCC 4.7.1
#include <iostream>
#include <string>
#include <locale.h>
using namespace std;
char max(char a, char b)
{
return (a > b) ? a : b;
}
char min(char a, char b)
{
return (a < b) ? a : b;
}
int main(void)
{
setlocale(LC_ALL,"rus");
string s;
cout<<"Введите число: "; cin>>s;
char min_c = '9', max_c = '0';
for(size_t i = 0; i < s.length(); i++)
{
max_c = max(s[i], max_c);
min_c = min(s[i], min_c);
}
cout << "Наибольшая цифра: " << max_c << endl <<"Наименьшая цифра: " << min_c << endl;
return 0;
}