logo
Войти Регистрация Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
elizka070408
elizka070408
18.04.2022 06:52 •  Информатика

Составьте программу для решениясоставьте программу для решения следующей с использование цикла с предусловием: «выведите все точные квадраты натуральных чисел, не превосходящие данного числа n».

Ответ:
woonov1488
woonov1488
01.10.2020 17:53
Var n,i:integer;
begin
read (n);
for i:=1 to n do
if sqr(i)<=n then writeln (sqr(i));
end.
0,0(0 оценок)
Популярные вопросы: Информатика
sstresseddoutt
sstresseddoutt
22.04.2021 19:55
Дана программа. Введи данную программу в Паскаль. program perimetr_1; var a,b,p:real; begin a:= 5; b:= 13; p:=2*(a+b); writeln( p= ,p:4:0) end. Полученный результат: (…)=(…)...
kirilzz623
kirilzz623
01.04.2021 05:01
1.Какой протокол используется почтовой программой для защиты информации?​...
regional368
regional368
07.07.2020 06:05
1. У исполнителя Альфа две команды, которым присвоены номера: 1. прибавь 2; 2. раздели на b (b — неизвестное натуральное число; b ≥ 2). Выполняя первую из них, Альфа увеличивает...
Steyflie
Steyflie
03.12.2022 03:23
Вопросы и задания 1. Приведите примеры материальных, нематериальных и смешанных систем. 2. Приведите примеры систем, имеющих одинаковый состав, но разную структуру. 3. Назовите...
Аанимешка
Аанимешка
29.06.2022 14:12
Дана блок-схема. Какое значение будет иметь z на выходе, если x=38?...
olgateviasheva
olgateviasheva
03.09.2022 15:33
класс Выполните данный ниже алгоритм: Исходные числа 7, 10 Алгоритм: 1. Обозначим первое число А, а второе В 2. Заменить А на А + В 3. Заменить В на число 15 4. Заменить А на...
alizhanayanaoxi717
alizhanayanaoxi717
16.02.2021 02:11
с задачей на паскале! Данные вводятся с клавиатуры или из файла input.txt, выводятся на экран или в файл output.txt. Первые тесты не всегда совпадают с примерами из условия....
kira315
kira315
13.01.2023 15:41
Сколько единиц будет выведено на экран? s := 123456 ; while Length(s) 0 do begin Delete ( s, 1, 2 ); writeln ( 1 ) end;...
Nalalisa
Nalalisa
01.08.2021 06:47
Каковы принципы разработки алгоритма?...
Санчоs
Санчоs
29.09.2022 11:06
Что будет выведено на экран после окончания работы программы? s := 123456789 ; Delete ( s, 1, 2 ); n := Pos ( 6 , s ); writeln ( n );...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?