Отчет по практике: Редактирование и отладка программ с помощью Pascal

program as; Блок-схема

uses crt;

var a,b,c,y:integer;

begin clrscr;

writeln('Введи значение a,b);

readln(a,b);

C: = A +B

c:=a+b;

y:=55*c;

writeln('y=',y);

Y: = 55* C

readln;

end.

(Вводим значение 5,3)

Ответ:440

Задание 2. Составить алгоритм обмена значений 2х переменных A и B

program as; Блок-схема

uses crt;

var a,b,c:integer;

begin clrscr;

writeln(‘Введи значение a,b');

readln(a,b);

c:=a;

C: = A; A: = B; B: = C;

a:=b;

b:=c;

writeln('obmen',a,'-',b);

readln;

end.

(Вводим значение 5,6)