< >

Напишите программу вычисляющую площадь квадрата. Стороны пользователь вводит с клавиатуры

Ответы

Ответ дал: Mishka28
0

var

a:integer;

s:longint;

begin

repeat

write ('A = ' );readln(a);

until (a>0);

s:=sqr(a);

writeln (s);

readln;

end.

 

 

Похожие вопросы
Английский язык
2 года назад
ПОМОГИТЕ СРОЧНО!!!!! Эссе по английскому на тему What can we do to reduce litter around us?
Английский язык
2 года назад
Передайте следующие предложения вПередайте следующие предложения в косвенной речи: 1. Mary asked her Mom:"Where is my bag?"2. He wanted to know:"How can I help you?"3. The students were
Математика
7 лет назад
Дети поехали на велосипедах навстречу друг другу . у Маши скорость 6 км/ч , у пети 8 км/ч. Расстояние между деревнями 28 км. Через сколько часов они встретятся?
Математика
7 лет назад
помогите пожалуйста♡♡♡♡♡♡♡♡♡♡♡♡
Алгебра
10 лет назад
81*(1-cos^2a) если sina=5/9
Алгебра
10 лет назад
Помогите решить определенный интеграл пожалуйста))) определенный интеграл от 1 до 5 4dx
Алгебра
10 лет назад
3 в 8 степени * 4 в 11 степени : 12 в 7 степени = ?
Геометрия
10 лет назад
ABCD-трапеция, AB=CD, BH-высота, котрая делит основание на два отрезка, меньший из которых равен 5см. Найдите AD, если ее средняя линия = 9 см.