profile
Опубликовано 5 лет назад по предмету Информатика от mikkimaees

Информатика. Pascal ABC. Составьте программу ввода элементов массива d [1..6] с клавиатуры и вывода на экран элементов с положительными значениями.

  1. Ответ
    Ответ дан Issenpilon
    var
    d: array [1..6] of integer;
    i:integer;
    begin
    for i:=1 to 6 do
    read(d[i]);
    for i:=1 to 6 do begin
    if d[i]>0 then
    write(d[i],' ');
    end;
    end.
    1. Ответ
      Ответ дан mikkimaees
      Огромное спасибо ).
Самые новые вопросы