Предмет: Информатика, автор: tolmacheveg

2. Напишите программу, которая в последовательности целых чисел определяет их сумму и количество чётных чисел, кратных 5. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность). Программа должна вывести два числа: сумму последовательности и количество чётных чисел, кратных 5.

Пример работы программы:
Входные данные
4
60
15
0
Выходные данные
79
1


NqVixer: На каком языке программирования?
tolmacheveg: паскаль

Ответы

Автор ответа: denisleonov20052
1

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

var n,i,k :integer;

begin

k:=0;//количество чисел кратных 5

n:=0;//сумма последовательности

for i:=1 to 1000 do begin

read (a[i]);

if a[i]=0 then break;

n:=n+a[i];

if a[i] mod 10=0 then k:=k+1;

end;

writeln(n);

writeln (k);

end.

Автор ответа: pasha888000
0

Ответ:

Dev C++

#include <iostream>

#include <stdio.h>

#include <stdlib.h>

#include <math.h>

int main() {

int i, x, s, k;

while(scanf("%d", &x) != 0){

 if (x == 0) break;

 s += x;

 if (x % 5 == 0){

  if (x % 2 == 0){

  k++;

  }

 }

}

printf("k = %d", k-1);

printf("\ns = %d", s);

return 0;

}

Объяснение:

Похожие вопросы