написать программу S=a*a
помогите пожалуйста !!
denismikhailov:
Нужно ввести с клавиатуры a и чтобы на экран выводилась S?
Ответы
Ответ дал:
1
Ответ:
var s, a:Integer;
begin
readln(a);
s:=sqr(a);
write(s);
end.
var a:Integer;
begin
readln(a);
write('S = ', sqr(a));
end.
begin
readln(a);
write('S = ', sqr(a));
end.
Второй вариант
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
3 года назад
3 года назад
8 лет назад