Регистрация
ryzik1988
03.04.2021 15:53
Информатика
Есть ответ 👍

^^ номер 1. запросить число и вывести на экран квадрат этого числа, если оно окажется положительным или модуль этого числа, если оно отрицательно.

222
428
Посмотреть ответы 2

Ответы на вопрос:

mugenovak
mugenovak
4,8(28 оценок)
Код программы на pascal: var   number: integer; begin   write('введите число: ');   read(number);   if (number > 0) then     writeln(number * number)   else if (number < 0) then     writeln(-number); end.
timur123123
timur123123
4,5(28 оценок)

cls

dim a(10)

for i=1 to 10

a:

input a(n)

if int(a(n))< > a(n) then goto a

s=s+a(n)

next i

print s

 

примерная блок-схема, можно конечно и покрасивее

Популярно: Информатика