Написать программу на языке паскаль, которая принимает на вход целое число и выводит текст - число натуральное, или текст - число не является натуральным в зависимости от значения числа.
197
347
Ответы на вопрос:
если число целое, то если оно положительное, то оно натуральное.
если число отрицательно, то оно не натурально.
надеюсь дальше объяснять не надо.
Var n,i: integer; begin read(n); for i: =1 to n do if (i*i> n) then begin writeln(i); break; end; end.
Популярно: Информатика
-
artemdolgin6910.06.2020 18:21
-
lyubimuchkaozd15q02.11.2021 14:01
-
ep1cook1e13.04.2022 18:11
-
lyubashabelyaeva22.02.2023 21:19
-
6473824858588484728.09.2020 09:15
-
valya2708198603.08.2022 01:15
-
bodydop07.09.2020 22:41
-
МарусяЧешир20.08.2021 00:02
-
PolinaCat2915.10.2022 18:05
-
alesaastudinap0dbun14.05.2023 15:59