Задать вопрос Регистрация
Помочь другим

  • написать программу которая выводит на экран в столбик курс евро за последние 7 дней В ПАСКАЛЕ)поомигете 

Ответы 2

  • Program z1; var a1,a2,a3,a4,a5,a6,a7:integer; begin writeln('нвведите курс евро через пробел за последние 7 дней'); readln(a1,a2,a3,a4,a5,a6,a7); writeln(a1); writeln(a2); writeln(a3);writeln(a4); writeln(a5); writeln(a6);writeln(a7); end.

  • program picaso; uses crt;type vector=array[1..100] of real;var a:vector;    i,n:integer;begin clrscr;    writeln('количество дней :');readln(n);    for i:=1 to n do     begin        write('день ',i,' : ');        readln(a[i]);    end;    writeln('Динамика курса EUR');    for i:=1 to n do        writeln(a[i]:4:4,' ');        readln;end.

    • Автор:

      barker18
    • 5 лет назад
    • 0

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years