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

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.