Кто объяснит, как составлять программы в паскале? и решить : написать в программу нахождения периметра и площади прямоугольника, значения сторон которого надо вводить с клавиатуры.

Что касается конкретной программы - ! 1. описываем нужные нам переменные - это будут стороны прямоугольника a и b. поскольку нигде ничего о размерах сторон не сказано, придется предположить, что они не обязательно будут целыми , мы опишем эти переменные, как вещественные (real), что позволит работать и с нецелыми значениями. 2. из нам известны формулы периметра прямоугольника p=2 x (a+b) и площади прямоугольника s=a x b. можно описать переменные p, s (тоже real), но смысла в этом нет, поскольку значения p и s нужны только для вывода результатов, так что проще написать нужные выражения непосредственно в операторе вывода. 3. итак, с описанием переменных закончили, можно начинать основную программу ключевым словом begin. и сразу же пишем к нему завершающий end с точкой на конце - таковы правила языка паскаль. вся программа размещается между двумя этими ключевыми словами. 4. сначала организуем ввод. это два оператора. первый оператор выводит так называемое "приглашение" - сообщает о том, что нужно ввести. второй оператор - это сам ввод. 5. а теперь, как было сказано выше, организуем вывод результатов. все это сделает один оператор вывода. программа готова! var   a, b: real; begin   write('введите стороны прямоугольника: '); readln(a, b);   writeln('периметр равен ', 2 * (a + b), ', площадь равна ', a * b) end. тестовое решение: введите стороны прямоугольника: 4 3.16 периметр равен 14.32, площадь равна 12.64

#!/bin/bash

a=$true

while ($a)

do

clear

echo "1. Enter path"

echo "2. Enter file extension"

echo "3. Copy file"

echo "4. Exit"

read VAR

clear

if [[ $VAR -eq 1 ]]

then

echo "enter path"

read path

read -p "Нажмите ENTER для продолжения"

fi

if [[ $VAR -eq 2 ]]

then

echo "Enter file extension"

read fex

cd $path

ls *.$fex

read -p "Нажмите ENTER для продолжения"

fi

if [[ $VAR -eq 3 ]]

then

echo "enter path to copy file"

read pathcopy

cp -R $path/*.$fex $pathcopy

read -p "Нажмите ENTER для продолжения"

fi

if [[ $VAR -eq 4 ]]

then

echo "Exit"

read -p "Нажмите ENTER для продолжения"

let "a=false"

fi

done

Объяснение:

Вивести на екран вікно з повідомленням можна за до процедури ShowMessage або функції MessageDlg.

Процедура ShowMessage виводить на екран вікно з текстом і командної кнопкою ОК.
У загальному вигляді інструкція виклику процедури ShowMessage виглядає так:
ShowMessage (Повідомлення);
де повідомлення – текст, який буде виведений у вікні.

Слід звернути увагу на те, що в заголовку вікна повідомлення, що виводиться процедурою ShowMessage, зазначено назва програми, з якою задається на вкладці Application вікна Project Options. Якщо назва додатка не задано, то в заголовку буде ім’я виконуваного файлу.