Составте программу, которая выводит квадратный корень заданного числа N, если число положительное и кратная к 5, в противном случае квадрат числа
katyatyan2003ozrqxb
1
27.10.2020 10:10
0
Другие вопросы по теме Информатика
Лунa
28.05.2019 04:20
veronikashows
28.05.2019 04:20
474886
30.04.2020 21:51
marullens
18.07.2019 04:00
Дурашка008
18.07.2019 04:00
fsjxjnlsjaCn
09.08.2019 00:50
rakitina03
09.08.2019 00:50
ԺⱭNÍYⱭ
13.05.2020 06:36
Популярные вопросы
- Теплый ветерок быстро бежит по веточками. Нужно разобрать по членам,...
1 - Напишите вторую и третью форму этих глаголов: learn,put,make,blow,burn,let,wear,fly...
3 - Через ДЕФІС треба писати всі прийменники врядку : А) по\над , по\під...
2 - Ұзындығы 15 метр жіпті екіге бөлді .Бір бөлігі барлық жіптің ұзындығының...
1 - 1)Я вошёл в хату две лавки и стол да огромный сундук возле печи составляли...
3 - Тендеуди шешу X-(17+24)=32...
1 - номер 11.Эссе надо написать......
1 - Периметр прямоугольника равен...
2 - «Жер және ғарыш»«Заттар мен материалдар»«Энергия жәнеқозғалыс»«Адам...
3 - Людина і воша це приклад... з язків...
2
Объяснение:
begin
var N:=readinteger('N=');
if (N>0) and (N mod 5 =0) then
Writeln('N=',sqrt(N)) else
Writeln('N=',N**2);
end.