Нажимая на кнопку "Задать вопрос", я даю согласие на обработку персональных данных

Задать вопрос
Задать вопрос
  • Составить программу, которая в последовательности целых чисел находит сумму чисел кратных 7 в диапозоне от 6 до 80. Программа получает на вход целые числа, кол-во не известно, 0-признак окончания

    Входные данные: -7,14,84,0

    Составить по Паскалю

    • 12 April 2013
    • Ответ оставил: Slider808

    programm p;

    var

     a:array[1..100 ] of integer;

    i,n:integer;

    s:integer;

    begin

    readln n;

    for i:=1 to n do

    readln(a[i]);

     

    s:=0;

    for i:=1 to n do

    begin

    if (a[i]>5)and(a[i]<81)and(a[i]/7=int a[i]/7) then

    s:=s+a[i];

    if a[i]= 0 then break;

    end;

    writeln(s);

    end.

     

    • НЕ НАШЛИ ОТВЕТ?
    Если вас не устраивает ответ или его нет, то попробуйте воспользоваться поиском на сайте и найти похожие ответы по предмету школьной программы: английский язык.
    На сегодняшний день (29.03.2024) наш сайт содержит 244790 вопросов, по теме: английский язык. Возможно среди них вы найдете подходящий ответ на свой вопрос.
  • Нажимая на кнопку "Ответить на вопрос", я даю согласие на обработку персональных данных

    Ответить на вопрос

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

2 к6выу5у4в5ыу3ыцц Задание 2.7 Передайте следующие предложения в Passive Voice, обращая внимание на место предлога. E.g. We often speak about her. — She is often spoken about. 1. Bessie's father gave her a complete s... When and where are you going to have the celebration In your country at what times are the shops generally open? Почему сокращается численность Казахстанских козерогов?​ Why did people stay in their homes as much as possible?                A. The weather was cold B. There were many thievesC. There were police officers​ Use of English/ Task 4. Read and choose. 1. I enjoy to swim/ swimming. 2. I want to eat/ eating. 3. I hate to work/working on Sunday. 4. I want to learn/ learning Spanish. помогить, соч последнее ... B) Write sentences use Past Simple and Past Continuous 1)When/Alice/wake up /it/rain 2) Her/mother/make/breakfast/ when /she/come /home​ Topic 2. Write an article to a newspaper (120-150 words) describing the last Sport Competition where you or your friends participated (in a country or abroad) using Past tenses. Try to mention thes... сүт қоректілердің не жатады ​ Что делает человек, чтобы хорошо учиться в школе? Выбери и выпиши глаголы в форме прошедшего времени.1) Did he lived / live with his parents?2) She goed / went to the cinema last weekend.3) We didnt met / meet them at the station.​
*{ message }*