Задан одномерный массив А. Требуется переписать элементы одномерного массива А кратные 5 в массив В, а если такие отсутствуют, то выдать соответствующее сообщение.

оператор присваивания :=

оператор ввода read(x1,x2,...,xn) или readln(x1,x2,...,xn)

оператор вывода write(x1,x2,...,xn) или writeln(x1,x2,...,xn)

условный оператор if условие then оператор 1 else оператор 2

оператор варианта case управляющая переменная of

                                     набор значений1: оператор1;

                                     набор значений2: оператор2;

                                     ...

                                     набор значенийn: операторN

                               else

                                    альтернативный оператор

                              end;

оператор цикла с предусловиями while ... do

оператор цикла с постусловием repeat ... until

оператор цикла for ... do

оператор break осуществляет немедленный выход из циклов repeat, while, for.

оператор continue начинает новую итерацию цикла, даже если предыдущая не была завершина.

оператор exit осуществляет выход из подпрограммы.

оператор halt прекращает выполнение программы и возвращает код завершения в операционную систему.

Ну, если уж нужна программа на русском (как вы говорите), то вот она (это для системы Кумир):

алг

нач

вещ д, ш, в, пп, пер, пс, ок, по;

вывод "Расчёт параметров комнаты:", нс

вывод "Введите длину комнаты: д= "

ввод д

вывод "Введите ширину комнаты: ш= "

ввод ш

вывод "Введите высоту комнаты: в= "

ввод в

пп := д*ш

пер := (д+ш)*2

пс := пер*в

ок := пп*в

по := пп*2+пс

вывод нс, "Площадь пола= ", пп , нс

вывод "Периметр комнаты= ", пер , нс

вывод "Площадь стен= ", пс , нс

вывод "Объём комнаты= ", ок , нс

вывод "Площадь общей поверхности комнаты= ", по , нс

кон

Скрин внизу- это то, что программа выводит на экран.