Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
переписать во второй файл числа, умножив каждое на случайное целое. Pascal
народ еще ваша помощь нужна!но можете это решить до вечера.я вечером зайду. Задание1:Создать приложение в соответствии с вариантом. При выполнении операций ввода-вывода применять контроль...
Pascal нужны программы и блок-схемы 1. задано nточек своими координатами. найти номера и координать точек, наиболее удаленных друг от друга. расстояние между точками определить с помощью функции. 2. вычеслить сумму факториалов всех... 1. uses crt; const nmax=20; type mas=array of real; function Rasst(x1,y1,x2,y2:real):real; begin Rasst:=sqrt(sqr(x1-x2)+sqr(y1-y2)); end; var x,y:mas; n,i,j,imx,jmx:byte; https://www.cyberforum.ru/ pascal/ thread122533.html
Pascal Вывести TRUE https://www.cyberforum.ru/ pascal/ thread122539.html
Всем доброго времени суток! Вот две задачки: 1.С клавиатуры вводятся координаты точки А.Вывести TRUE , если точка находится по правую сторону от графика функции y=2*x+3, FALSE - в ином случае . ...
Разработка программы с использованием процедур и функций Pascal
Для заданных вещественных чисел x, y и z вычислить f((x+y)/2)+f((x+z)/2)+f((y+z)/2), где f(x)=1+x*x function F(x:real):real; begin F:=1+x*x; end; var x,y,z,r:real; begin writeln('Vvedite x,y,z:'); readln(x,y,z); r:=F((x+y)/2)+F((x+z)/2)+F((y+z)/2); write('Res=',r:0:2);
N выпуклых семиугольников Pascal
N выпуклых семиугольников заданы координатами своих вершин. Найти площадь и периметр самого большого семиугольника. В программе организовать ф-ию для вычисления длины стороны и процедуру для...
Pascal Подсчитать процент выхода на работу. https://www.cyberforum.ru/ pascal/ thread122515.html
Люди подумайте как можно сделать программу: Имеется учет ежедневных выходов на работу п = 10 рабочих в течение недели. Выход на работу фиксируется как 1, отсутствие как 0. Для произвольного дня... uses crt; const n=7; p=10; var mas:array of integer; i,j,d,s:integer; begin clrscr; for i:=1 to 10 do begin for j:=1 to 7 do begin mas:=random(2);
Pascal Преобразовать строку, заменив каждую точку многоточием
Помогите решыть. Данна строка символов. Преобразовать срока, заменить каждую точку многоточие (т.е. тремя точками) for i:=length(s) downto 1 do if s='.' then insert('..',s,i);
Pascal Замена слова в фразе https://www.cyberforum.ru/ pascal/ thread122564.html
Привет всем помогите пожалуйста,бестолковому. Задача в четыре действия: 1) С клавы вводиться фраза 2) Второй строчкой надо ввести слово из этой фразы 3) Третье слово но которое будет меняться... Дано три строки: S1, S2, S3. Заменив в строке S1 все вхождения строки S2 на S3.
Pascal Разложения числа на составляющие...
Всем доброго времени суток, помогите пожалуйста выполнить задачку Ввести с клавиатуры четырехзначное число(диапазон от 1000 до 9999). Разложить число на составляющие его цифры. Значение первых... a:=n div 1000; b:=n div 100 mod 10; c:=n div 10 mod 10; d:=n mod 10; дальше арифметика.
Pascal Создать матрицу и умножить на число https://www.cyberforum.ru/ pascal/ thread122548.html
Люди добрые, помогите сделать на паскале следующее задание!) а) Умножить k-ю строку матрицы А на заданное число; б) сформировать вектор V, элементами которого являются суммы модулей элементов... uses crt; const count=50; type arr=array of integer; var v:array of integer; i,j,n,m,k,x,sum,tmp,l:integer; a:arr; procedure inputmas(var a:arr; n,m:integer); var i,j:integer;
Pascal Строковый тип данных 1) Подсчитать количество цифровых символов в строке с кодами ASCII кратными трем. 2) Дана строка. Преобразовать ее, заменив каждый символ пробела на "-". 3) Дана строка. Подсчитать... https://www.cyberforum.ru/ pascal/ thread122553.html Pascal Заменить нулем в матрице те элементы, для которых имеются равные в массиве https://www.cyberforum.ru/ pascal/ thread122473.html
Даны действительные числа a1..a10 и целочисленная квадратная матрица n. Заменить нулем в матрице те элементы, для которых имеются равные а1..а10. Помогите плиз.
 Аватар для DeLuxe
156 / 158 / 93
Регистрация: 01.01.2010
Сообщений: 398
27.04.2010, 15:18 0

Вывести таблицу квадратов первых десяти целых положительных чисел. - Pascal - Ответ 689425

27.04.2010, 15:18. Показов 3861. Ответов 2
Метки (Все метки)

Ответ

Pascal
1
2
3
4
var i:integer;
begin
for i:=1 to 10 do write(sqr(i),' ');
end.


Вернуться к обсуждению:
Вывести таблицу квадратов первых десяти целых положительных чисел. Pascal
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
27.04.2010, 15:18
Готовые ответы и решения:

Вывести на экран таблицу квадратов первых десяти положительных чисел
program prog; var i:integer; begin for i:=1 to 10 do Writeln('i*i'); end. так правильно??

Написать программу, которая выводит таблицу квадратов первых десяти целых положительных нечетных чисел
Написать программу, которая выводит таблицу квадратов первых десяти целых положительных нечетных чисел.

Вывести таблицу квадратов первых 10 целых положительных чисел
Вот такая задачка: Вывести таблицу квадратов первых 10 целых положительных чисел(цикл For).

2
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
27.04.2010, 15:18
Помогаю со студенческими работами здесь

Вывести таблицу квадратов первых пяти целых положительных нечетных чисел, вводимых с клавиатуры
Задание 2. написать программу которая выводит таблицу квадратов первых пяти целых положительных нечетных чисел, вводимых с...

вывести таблицу квадратов первых 10 положительных чисел
вывести таблицу квадратов первых 10 положительных чисел

Найти сумму первых n целых положительных четных целых чисел
Написать программу, которая вычисляет сумму первых n целых положительных четных целых чисел. Количество суммируемых чисел должно вводиться...

Произведение первых n целых положительных чисел.
Написать программу, которая вычисляет произведение первых n целых положительных чисел. Количество чисел должно вводится во время работы...

Сумма первых n целых положительных чисел
напишите программу которая вычисляет сумму первых n целых положительных чисел. количество суммируемых чисел должно вводится во время работы...

0
Новые блоги и статьи
Использование кэша Laravel - полный гайд
bytestream 18.02.2025
Кэширование - один из наиболее эффективных способов повышения производительности веб-приложений. В современном мире, где скорость загрузки страниц напрямую влияет на удержание пользователей и. . .
Создаем REST API в Laravel с аутентификацией и Passport
bytestream 18.02.2025
Разработка современных веб-приложений все чаще требует создания надежного и хорошо структурированного API. REST API стал стандартом де-факто для построения взаимодействия между клиентской и серверной. . .
Пайплайны в Laravel - полный гайд
bytestream 18.02.2025
Разработка современных веб-приложений часто требует обработки сложных процессов, состоящих из множества последовательных шагов. Например, при создании системы комментариев может потребоваться. . .
Как правильно использовать @required в Symfony
bytestream 18.02.2025
При разработке приложений на Symfony мы часто сталкиваемся с необходимостью внедрения зависимостей. Фреймворк предоставляет несколько способов управления этим процессом, и одним из таких инструментов. . .
Система безопасности в Laravel: возможности и примеры
Wired 18.02.2025
Каждый день появляются новые виды атак и уязвимостей, которые могут поставить под угрозу конфиденциальные данные пользователей и функционирование всей системы. В этом контексте выбор надежного. . .
Давайте сравним Django и Laravel
Wired 18.02.2025
Django и Laravel - два мощных инструмента, которые часто сравнивают между собой. Оба фреймворка предлагают разработчикам богатый набор возможностей для создания масштабируемых веб-приложений, но. . .
Laravel или React - что лучше?
Wired 18.02.2025
В разработке веб выбор правильного инструмента часто определяет успех всего проекта. Особенно интересным представляется сравнение Laravel и React - двух популярных технологий, которые часто. . .
Laravel 11: новые возможности, гайд по обновлению
Wired 18.02.2025
Laravel 11 - это новая масштабная версия одного из самых популярных PHP-фреймворков, выпущенная в марте 2024 года. Эта версия продолжает традицию внедрения передовых технологий и методологий. . .
Миграции в Laravel
Wired 18.02.2025
Разработка веб-приложений на Laravel неразрывно связана с управлением структурой базы данных. При работе над проектом часто возникает необходимость вносить изменения в схему базы данных - добавлять. . .
Аутентификация в Laravel
Wired 18.02.2025
В современном мире веб-разработки безопасность пользовательских данных становится критически важным аспектом любого приложения. Laravel, как один из самых популярных PHP-фреймворков, предоставляет. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru