• 23 March 2017
    • Українська література
    • Автор: Ruslanagot

    Нужно составить программу.В Pascal

    • Ответ оставил: Мненужнпомошь
    Var   A:array[1..50] of integer;   i,N,m:integer;BeginWrite('N = ');ReadLn(N);For i:= 1 to N do    Read(A[i]);m:=A[N];For i:=1 to N-1 do    if A[i]
    • Ответ оставил: Мненужнпомошь
    // PascalABC.NET 3.2, сборка 1411 от 23.03.2017// Внимание! Если программа не работает, обновите версию!begin  var a:=ReadArrReal(ReadInteger('n='));  var i:=a.IndexMi...
    • НЕ НАШЛИ ОТВЕТ?
    Если вас не устраивает ответ или его нет, то попробуйте воспользоваться поиском на сайте и найти похожие ответы по предметы...

Последние опубликованные вопросы