Отправляет email-рассылки с помощью сервиса Sendsay

Паскаль для школьников

Подписаться Бесплатная новостная рассылка Подписчиков 27 RSS
←   Ноябрь 2003   →
 1
 2
 3
 4
 5
 6
 7
07.11.2003
11:02:43
11:02:50
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30


За последние 60 дней ни разу не выходила


Открыта: 11-06-2003

Автор
$ereg@

Статистика

27 подписчиков
0 за неделю
←   Все выпуски   →

Паскаль для школьников


Информационный Канал Subscribe.Ru
Выпуск No 5

 

Выпуск No 6

Автор рассылки $ereg@

www.karsun.by.ru

 

 

     Привет, привет. Ну что решили задачку, или вам такие решать не интересно. Напишите если нужно опубликовать в рассылке уроки по Паскалю. И на какую тему.

Вот решение задачи предыдущего номера:

Введите с клавиатуры в массив х пять значений, выведите на экран значение корней и квадратов каждого элемента.

program massiv2;

uses crt;

var x:array[1..5] of integer;

       i: integer;

begin

  clrscr;

    for i:=1 to 5 do

      begin

         write('Введите элемент ',i,'   ');

         readln(x[i]);

      end;

  clrscr;

    for i:=1 to 5 do

      write(x[i]:5, '  ');

  writeln;

    for i:=1 to 5 do 

      write(sqrt(x[i]):5:2, '   ');

  writeln;

     for i:=1 to 5 do

       write(sqr(x[i]:5,'   ');

  readln;

end. 

 

 А не хотите ли решить олимпиадные задачки?

1. Вводятся две строки символов в кодировке ASCII. Символы находятся в диапазоне [32..126]. Требуется определить, какие символы встречаются в обеих строчках, а какие только в одной, и вывести их в порядке возрастания номера. Проверка корректности входных данных не требуется.

Пример.
Входная информация: Выходная информация:
Information;
Revolution		 в обеих: inot
в одной: IRaeflmru

 

2. Имеется n1 шоколадных конфет, n2 карамели и n3 леденцов. Сколько подарочных наборов к Новому году можно составить из этих конфет, если известно, что в каждом наборе должно быть k1 шоколадных, k2 карамели и k3 леденцов?

 

Присылайте свои решения. И я опубликую их в рассылке.
http://subscribe.ru/
E-mail: ask@subscribe.ru 		Отписаться
Убрать рекламу
В избранное