Вариант 5. для контроля. комплеит ладаний, 1. написать программу расчета по формуле. предварительно подготовить тестовые примеры. + 2. написать программу, попадание точки с определенными координатами в заданную плоскую область. значения координат и радиуса вводить с клавиатуры. работы программы вывести в виде текстового сообщения 3. разработать программу обработки одномерного массива вещественных величин. размерность массива задать именованной константой. 1) найти минимальный элемент массива 2) найти сүмму элементов массива, расположенных между перным и последним положительными элементами. 3) преобразовать массива так, чтобы сначала располагались все элементы, равные нулю, потом - все остальные. 4. разработать программу обработки двумерного массива. дана целочисленная прямоугольная матрица. определить: 1 )составить программу подсчета суммы всех отрицательных элементов и суммы элементов главной диагонали; 2) вывести на экран только элементы всех четных строк матрицы. вывод организовать по строкам. 5. разработать программу обработии текстового файла с использованием строк и символов. написать программу, которая создает/открывает файл address. txt и дописывает в него фамилию, имя, город проживания, введенные с консоли. необходимо ввести не менее 5 записей. организовать поиск в файле городу, найти всех, проживающих в городе определенном городе и вывести информацию о них 6. описать структуру с заданным именем и полями. разработать программу, обрабатывающую массив таких структур указанным коллекция книголюба. поля: шифр книги, автор, название, год издания, местоположение (номер стеллажа). написать программу, которая выбирает необходимую информацию с диска и выводит на экран: - местоположение книги, автора х названия - список книг автора z, находящихся в коллекции; - число книг издания хх года, имеющихся в библиктеке. 7. выполнить 3, 4 используя подходящие контейнеры и алгоритмы. 8. выполнить 1, 2, 5 каждый пунит в виде функции. все необходимые данные для функций должны передаваться им в качестве параметров. использование переменных в функциях не допускается. 9. выполнить 3, 4 оформив каждый пункт в виде шаблона функции. все необходимые данные для функций должны передаваться им в качестве параметров. использование переменных в функциях не допускается. примеры программ, использующих эти шаблоны для типов int, float и double. 10. разработать оконное приложенине для windows с применением технологии win api, демонстрирующее результаты 1, 2.

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

BazikPro

07.01.2022 16:40

В чем ошибка Pascal program zadanie2; var B: file of integer; c, sum: integer; begin sum:=0; assign(B, C:/B.txt ); reset(B); while not EOF(B) do begin readln(B, c); sum := sum...

bebe9

07.01.2022 16:40

1. У яких випадках доцільно використовувати компонент RadioButton? 2. Яких значень може набувати властивість Checked компонента RadioButton? 3. Яка подія є основною для компонента...

linapetrenko

29.04.2022 11:55

Разработайте алгоритм и программу для решения следующей задачи. По значениям длины, ширины и высоты прямоугольного параллелепипеда определить, сколько его граней являются квадратами...

MiaRia123

21.09.2021 18:26

Для каждого рисунка напишите программу для Робота...

спроситьнадо

28.09.2022 15:11

Запиши, чим цикл, що повторюється при виконанні умови, відрізняється від циклу, що повторюється до виконання умови...

student130

03.07.2022 17:31

Растровое изображение размером 1024x512 пикселей, в котором используется 256 различных цветов, было передано в город а по каналу связи за 36 секунд. в городе а это же изображение...

jvdvzkris

01.04.2021 09:40

Медведя выбрала инструмент ПИПЕТКА. Какой кнопкой мыши ей следуетщелкнуть по точке рисунка, чтобыцвет этой точки стал основнымцветом?левойправой...

Искорка123456

26.04.2022 00:30

Скласти програму, яка у введеному з клавіатури рядку підраховувала б кількісь пробілів.(в Phyton )...

kanevskiygabe

23.08.2022 03:08

НАПИСАТЬ ПРОГРАММУ В ПАСКАЛЕ сажень. Напишите программу, которая переводит сажени в соответствующие единицы измерения современности. ответ дайте в формате целого числа...

Osdit

01.10.2022 05:39

Скорость передачи данных через ADSL-соединение равна 256000 бит/c. Передача файла через данное соединение заняла 10 секунд. Определи размер файла в Кбайт....

Ответ:

РУСЛАН113228

26.08.2020 17:32

1) Набираем 8ми литровый кувшин
2) отливаем 3 литра в 3х литровый и сливаем из него воду
3) в 8ми литровом осталось 5л воды, сливаем снова в 3х литровый, и в 8ми литровом осталось 2 литра воды.
4) выливаем из 3х литрового воду, и переливаем в него 2 литра, оставшиеся в 8литровом кувшине.
5)Снова наполняем 8ми литровый кувшин, и доливаем из него воду в 3х литровый кувшин, так как в 3х литровом налито 2 литра - там не хватает одного литра, значит отлив из 8ми литрового литр в нем останется 7 литров :)

0,0(0 оценок)

Ответ:

Iriska91l23

26.08.2020 17:32

1. Современный вариант (коротко, быстро и наглядно, кто знает). Так уже начали учить в некоторых школах.

// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
var s:=ArrRandom(ReadInteger('n='),1,300).Println.
      Where(k->(k>=100) and ((k mod 100) div 10=0));
if s.Count>0 then Writeln(s.Max) else Writeln('Нет элементов')
end.

Пример
n= 15
76 283 171 140 113 65 185 35 202 42 93 51 205 76 138
205

2. А так по-прежнему учат в большинстве школ. Стиль "80-х годов века". Долго, длинно, можно наделать ошибок, но по-другому эти учителя сами не могут.

const
nn=100;
var
i,n,max:integer;
a:array[1..nn] of integer;
begin
Write('n=');
Read(n);
Randomize;
max:=0;
for i:=1 to n do begin
    a[i]:=Random(300)+1;
    Write(a[i],' ');
    if (a[i]>=100) and ((a[i] mod 100) div 10=0) then
      if a[i]>max then max:=a[i]
    end;
Writeln;
if max>0 then Writeln(max)
else Writeln('Нет элементов')
end.

Пример
n=15
219 68 131 115 104 169 80 288 143 108 124 214 50 101 1
108

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку