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

Написать программу и сделать блок схему вход: а выход: квадраты всех чисел от 1 до а

Ответ:
tttyadoyan235
tttyadoyan235
09.10.2020 13:53

var a,i:integer;

begin

readln(a);

for i:=1 to a do writeln(i*i);  

end.

0,0(0 оценок)
Популярные вопросы: Информатика
gangsta288
gangsta288
04.11.2021 10:48
Xy действительны числа . найти z=-2x^2+2xy...
0010110
0010110
17.06.2021 17:01
Рассматривается множество целых чисел, принадлежащих числовому отрезку [3672; 9117], которые удовлетворяют следующим условиям: - остаток от деления на 3 равен 2; -...
Yrikrylko
Yrikrylko
15.08.2021 17:33
Какое устройство обеспечивает взаимосвязь между внешним устройством и компонентами пк (видеокарта, звуковая карта, сетевой адаптер и т.д.) , . информатика, 7 класс....
MAN1337228
MAN1337228
16.07.2022 03:19
Напишите программу, которая выводит в порядке возрастания все корни уравнения ax3+bx2+cx+d=0 на отрезке [0,1000]. Если решений к данному уравнению не существует, то...
dawdawad
dawdawad
14.08.2020 14:13
Написать программу(с++) даны два числа. найти среднее арифметическое кубов этих чисел и среднее модулей этих чисел. исходные данные разместить на двух строках. выдать...
st1rb1t
st1rb1t
07.02.2020 02:26
(№ 776) определите, что будет напечатано в результате работы следующей программы. var s,і: integer; begin s : = 3; for і : = 2 to 5 do s : = s + 2* і; writeln (s) ;...
abdullaxadeaygün
abdullaxadeaygün
04.05.2022 16:52
Числа вводятся с клавиатуры через запятую. Выведите два самых больших по модулю чисел ряда. Числа выведите по неубыванию абсолютного значения через пробел. Гарантируется,...
poli1001
poli1001
23.10.2022 13:33
Что появится на экране после выполнения команд a:=160; writeln( 187= , a);...
doblezor
doblezor
29.11.2022 19:02
Постройте цепочку днк ,если известно последовательность нуклиатидов в рнк а-у-ц-ц-г-у-а-а-у-у-ц-г-а...
Nika5647
Nika5647
29.11.2022 19:02
Іть зробити у людини праворукість домінує над ліворукістю, а хондроплазія над нормальним розвитком скелета. які діти народяться у сімї, де чоловік та жінка праворукі...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?