ОЧЕНЬ Допишите программу в Pascal и определите значения переменной x после выполнения программы. Запишите чему равен x.

a := 2;

x := a+2;

if x > 4 then

x := x+2*a

else x:= a-x;

#!/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. Якщо назва додатка не задано, то в заголовку буде ім’я виконуваного файлу.