Составить программу в Паскале которая находит площадь и периметр прямоугольника по длинам двух его сторон (Дано трёхзначное число. Вывести на экран его последнюю цифру).

Program qwerty;vara,b,c,d:integer;beginwriteln('Введи ширину');readln(a);writeln('Введи длину');readln(b);c:=a*b;d:=a+a+b+b;writeln('площадь: ');writeln(c);writeln('периметр: ');writeln(d);end.

Program qwerty;vara,b,c,d:integer;beginwriteln('Введи ширину');readln(a);writeln('Введи длину');readln(b);c:=a*b;d:=a+a+b+b;writeln('площадь: ');writeln(c);writeln('периметр: ');writeln(d);end.