Top.Mail.Ru
Ответы

ИНФОРМАТИКА 9 КЛАСС

Напишите программу на языке программирования
Pascal (можно использовать языки Python, C++, C# или Java, но
обязательно приложите скриншот программы с результатом
выполнения). Программа должна создавать массив из 5
вещественных чисел, значения которого задаются
пользователем с клавиатуры (пользовательский ввод), и
выводить в результате выполнения все положительные
элементы этого массива и сумму этих положительных чисел.
В качестве ответа запишите код программы

По дате
По Рейтингу
Аватар пользователя
Новичок

выводить в результате выполнения все положительные
элементы этого массива и сумму этих положительных чисел.

Если сам массив выводить не надо - то вот программа (см. ниже):

Pascal

12345678910111213141516171819202122232425262728293031
 Program P1; 
uses crt; 
const n=5; 
type mas=array [1..n] of real; 
var i: byte; 
    m: mas; 
    s: real; 
begin 
textbackground (blue);
textcolor (white);
clrscr; 
s:=0; 
writeln ('Введите с клавиатуры элементы массива (только числа).'); 
writeln ('После ввода каждого из элементов нажимайте клавишу Enter.'); 
writeln ('При вводе дробных значений'); 
writeln ('целую часть от дробной отделяйте точкой, а не запятой.'); 
for i:=1 to n do begin 
    write ('Введите ', i,'-й элемент массива: '); 
    readln (m[i]); 
    end; 
write ('Положительные элементы введенного массива:'); 
for i:=1 to n do if m[i]>0 then begin 
    s:=s+m[i]; 
    write (' ', m[i] :0:2); 
    end; 
writeln (' '); 
writeln ('Сумма положительных элементов введенного массива: ', s :0:2); 
write ('Программа завершена. Для выхода нажмите клавишу Enter.'); 
readkey; 
end. 
 

Python

123456789101112131415
 from array import * 
print ("Введите с клавиатуры элементы массива (только числа). После ввода каждого из элементов нажимайте клавишу Enter. При вводе дробных значений целую часть от дробной отделяйте точкой, а не запятой.") 
n=5 
s=0 
m=array('d', []*n) 
for i in range (n): 
    print ("Введите", i+1, "элемент массива:", end=" ") 
    a=float (input ()) 
    m.append (a) 
print ("Положительные элементы введенного массива:") 
for i in range (n): 
    if m[i]>0: 
        s=s+m[i] 
        print (m[i], end=" ") 
print ("\nСумма положительных элементов введенного массива:", s) 

C++

12345678910111213141516171819202122232425
 #include <iostream> 
using namespace std; 
int main () 
{ 
    setlocale (LC_ALL, "RUS"); 
    const unsigned short n=5; 
    unsigned short i; 
    long double m[n], s; 
    s=0; 
    cout<<"Введите с клавиатуры элементы массива (только числа). После ввода каждого из элементов нажимайте клавишу Enter. При вводе дробных значений целую часть от дробной отделяйте точкой, а не запятой."; 
    for (i=0; i<n; i++) { 
        cout<<"\nВведите "<<i+1<<"-й элемент массива: "; 
        cin>>m[i]; 
    } 
    cout<<"\nПоложительные элементы введенного массива:"; 
    for (i=0; i<n; i++) { 
        if (m[i]>0) { 
            s=s+m[i]; 
            cout<<" "<<m[i]; 
        } 
    } 
    cout<<"\nСумма положительных элементов введенного массива: "<<s; 
    getchar (); 
    return 0; 
} 

приложите скриншот программы с результатом
выполнения

см. ниже прикрепленное изображение:

Аватар пользователя
Мыслитель

Program ms;
uses crt;
var i: integer;
x:array [1..5] of real;
s:real;
begin
s:=0;
writeln(' wwedite elem. mass!');
for i:=1 to 5 do begin
write('x[',i,']='); read(x[i]); end;
write(' pol. elem. mass. ');
for i:=1 to 5 do begin
if x[i]>0 then write(x[i],'; '); end;
for i:=1 to 5 do begin
if x[i]>0 then s:=s+x[i]; end;
writeln; writeln('sum. pol.elem.mass:=',s);
readkey;end.