Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Султанбек111
0 / 0 / 0
Регистрация: 01.05.2016
Сообщений: 8
1

Что вычисляет следующая программа, если мы вводим n натуральных чисел a1, a2, …, an?

14.09.2017, 19:50. Просмотров 293. Ответов 1
Метки нет (Все метки)

Что вычисляет следующая программа, если мы вводим n натуральных чисел a1, a2, …, an?
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
var n, a, k, i: integer;
begin
writeln('Введите количество натуральных чисел');
readln(n);
k:=0;
writeln('Введите ', n, ' натуральных чисел');
for i:=1 to n do
begin
readln(a);
if sqr(trunc(sqrt(a)))=a then if trunc(sqrt(a)) mod 2 <>0 then k:=k+1;
end;
writeln(k);
end.
Количество полных квадратов среди a1, a2, …, an.
Количество удвоенных нечетных чисел среди a1, a2, …, an.
Количество квадратов нечетных чисел среди a1, a2, …, an.
Количество квадратов четных чисел среди a1, a2, …, an.
Количество удвоенных полных квадратов среди a1, a2, …, an.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
14.09.2017, 19:50
Ответы с готовыми решениями:

Напишите, что выведет на экран следующая программа
Напишите, что выведет на экран следующая программа: Program V1_Z1; Var A,B:...

Напишите, что выведет на экран следующая программа:
1 Напишите, что выведет на экран следующая программа: Program V2_Z1; Var...

Задача такая: вводим массив, вводим строку, если последние символы элемента массива совпадают с символами строки выводим элемент массива(см. Описание)
Например Вводим массив: ррррррффф ллллллл ееееееффф тттттт Вводим...

Вводим с клавиатуры 5 чисел, программа находит сумму положительных чисел, сумму отрицательных чисел
1) Вводим с клавиатуры 5 чисел, программа находит сумму положительных чисел,...

Напишите программу которая вычисляет сумму первых n натуральных чисел
напишите программу которая вычисляет сумму: первых n натуральных чисел;...

1
Puporev
Модератор
54701 / 42113 / 29079
Регистрация: 18.05.2008
Сообщений: 99,392
14.09.2017, 19:56 2
Количество квадратов нечетных чисел среди a1, a2, …, an.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.09.2017, 19:56

Вводим число и программа должна показать сколько от 0 до этого числа четных чисел
Это из школьной программы, возможно у когонить есть программы выполняющие...

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

Вводятся числа, пока не вводится 0, если его ввели, то программа вычисляет сумму всех введённых чисел
в компьютер вводятся числа, пока не вводится 0, если его ввели, то программа...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru