Задать вопрос
6 декабря, 04:08

Нужна помощь в написании программы (можно писать на языке паскаль или delphi). Задача: При заданной величине А и заданных элементах X1, X2, ..., Xn и Y1, Y2, ..., Yn определить число произведений вида XiYi, удовлетворяющих условию XiYi ≤ А, и сумму таких произведений.

+2
Ответы (1)
  1. 6 декабря, 05:48
    0
    Const n=5;

    var x, y:array[1 ... n] of integer;

    i, j, a, s, k:integer;

    begin

    writeln ('vvedite a=') ;

    readln (a) ;

    writeln ('vvedite massiv x=') ;

    for i:=1 to n do

    read (x[i]) ;

    writeln ('vvedite massiv y=') ;

    for j:=1 to n do

    read (y[j]) ;

    k:=0;

    s:=0;

    for i:=1 to n do

    for j: = 1 to n do

    if x[i]*y[j]<=a then begin

    k:=k+1;

    s:=s + (x[i]*y[j]) ;

    end;

    writeln ('kolicestvo=', k,' summa=', s) ;

    readln;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Нужна помощь в написании программы (можно писать на языке паскаль или delphi). Задача: При заданной величине А и заданных элементах X1, X2, ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Линейная структура построения программы подразумевает - 1) повторение отдельных частей программы 2) последовательно выполнение всех элементов программы 3) выполнение лишь нескольких, удовлетворяющих заданному условию частей программы
Ответы (1)
Ввести слово и число раз (Ввод; паскаль, 3). Вывести это слово так: паскаль паскаль паскаль паскаль паскаль паскаль
Ответы (1)
Помгите! Программа Паскаль Вопрос 1. Функция служебного слова Var. Вопрос 2. С какими числами можно работать в программе Паскаль? Вопрос 3. Оператор ввода. Как он записывается в Паскаль? Вопрос 4. Функция служебного слова Const. Вопрос 5.
Ответы (1)
Какие программы относятся к прикладным программам? A. Программы общего назначения. B. Специальные профессиональные программы. C. Языки программирования. D. Сервисные программы. E. Операционные системы.
Ответы (1)
Антивирусные программы-это 1. программы сканирования и распознавания 2. программы выявляющие и лечащие компьютерные вирусы 3. программы только выявляющие вирусы 4. программы-архиваторы разархиваторы
Ответы (1)