Question

Практична робота № 1 Варіант - 3 . Тема: " Складання та реалізація на ЕОМ лінійних програм " . Мета: Поглибити навички роботи в трансляторi Pascal. Навчитись складати найпростіші лінійні програми. Увага! під час роботи 3 комп’ютером дотримуйтеся правил безпеки і санітарно- гігієнічних норм. Хід заняття: 1. Скласти програму знаходження площі квадрата S із стороною а (7б) 2. Обчислити для а = 5 см. (1б) 3. Передбачити в програмі візуалізацію введення змінної а (2б) 4. Результат представити у вигляді: площа квадрата S = 25 кв.см.(2б) Дотримуйтесь технічних вимог умови завдання! Даю 70 балів​

Answer 1

program square_area;

var

 a, S: real;

begin

 write('Введите длину стороны квадрата (в см): ');

 readln(a);

 

 writeln;

 writeln('Вы ввели длину стороны квадрата: ', a:0:2, ' см');

 writeln;

 

 S := a * a;

 

 writeln('Площадь квадрата S = ', S:0:2, ' кв.см.');

end.

Answer 2

Ось програма на мові Pascal, яка виконує задані умовою завдання:

pascalCopy code
program SquareArea;
var
  a, S: real;
begin
  writeln('Введіть сторону квадрата (у сантиметрах): ');
  readln(a);
  
  S := a * a;
  
  writeln('Площа квадрата S = ', S:0:2, ' кв.см.');
end.

Ця програма використовує змінну a для збереження введеного значення сторони квадрата у сантиметрах. Площа S обчислюється, помноживши значення a на себе. Результат виводиться на екран.

Для обчислення площі квадрата зі стороною а = 5 см програму можна модифікувати наступним чином:

pascalCopy code
program SquareArea;
var
  a, S: real;
begin
  a := 5;
  
  S := a * a;
  
  writeln('Площа квадрата S = ', S:0:2, ' кв.см.');
end.

У цьому випадку введення значення а здійснюється присвоєнням a := 5, а не введенням з клавіатури.