Школьная олимпиада по информатике для начинающих
 
Информатика в школе


Видео курсы для чайников фотошоп, joomla, wordpress, php, css 
  Главная  ●  Карта сайта
 
 

Школьная олимпиада по информатике для начинающих

[назад]

Задача №1.Найти наибольшее целое число из четырех введенных с клавиатуры (5 баллов).

var

x,y,z,w:integer;

begin

writeln('Введите четыре целых числа');

readln(x,y,z,w);

if x < y then

  x := y;

if x < z then

  x := z;

if x < w then

  x := w;

writeln('Максимальное число =  ', x);

readln;

end.

 

Задача №2. Написать программу, которая будет менять местами два введенных с клавиатуры слова. Слова разделены пробелом (10 баллов).

Тест. Введено «Иван Петров», результат «Петров Иван».

var

  str, str2:string;

  i:integer;

begin

  writeln('Введите строку символов');

  readln(str);

  for i := 1 to length(str) do

    if str[i] = ' ' then

      begin

         str2 := copy(str,1,i-1);

         delete(str,1,i);

      end;

writeln('Итоговая строка - ',str + ' '+ str2); readln;

end.

 

Задача №3. Подсчитайте, сколько слов во введенном предложении начинается с буквы «w» (15 баллов).

var

  str:string;

  x ,i:integer;

begin

  writeln('Введите предложение');

  readln(str);

  for i:=1 to length(str) do

    if str[i]=' ' then

      if str[i+1]= 'w' then

        x:=x+1;

 end;

  if str[1]='w' then

    x:=x+1;

  writeln(‘Количество слов в предложении  начинающихся буквой «w»  =  ‘ , x);

  readln;

end.

[назад]

 

Книжные новинки
Как сделать свой сайт и заработать на нем Е. Мухутдинов
Копилка
Рабочие программы
Проекты MS Office
Презентации
Открытые уроки
Экзаменационные билеты
Элективные курсы
Бесплатный soft
 Инструкции по ТБ
Подготовка к олимпиадам по информатике
Методика подготовки
"Золотые" алгоритмы
Простые задачи для начинающих
Олимпиадные задачи с решениями
Книги
Среда программирования
Обучение программированию на С++
Справочник по языку Pascal
Обучение
Подготовка к ЕГЭ
Создание сайтов
Уроки FrontPage
Уроки Word 2003
Создание игр на Delphi
Печатаем вслепую

Информация

Наши интервью
Книга почета
Курсы повышения квалификации
Электронная библиотечка
Книжная полка
Статьи
Полезные ссылки
Обратная связь

Конкурсы

Олимпиада
Фотоконкурс
VIP
Персональный раздел профессора
Макаровой Н.В.
Персональный раздел профессора
Смыковской Т.К.