Question

Написать программу в паскале , которая получает n чисел ( n вводится с клавиатуры) и находит сумму чисел, заканчивающихся цифрой "0" ОЧЕНЬ СРОЧНО!!!!

Answer 1

var

i,n,s, k : integer;

begin

s:=0;

readln (n);

for i:= 1 to n do begin

readln (k);

if k mod 10 =0 then s:= s+k;

end;

writeln (s);

end.

Answer 2

Конечно, вот программа на языке Паскаль, которая считывает n чисел и находит их сумму, если они заканчиваются цифрой "0":

pascalCopy code
program SumOfNumbersEndingWithZero;

var
  n, num, sum: integer;
  i: integer;

begin
  sum := 0;

  // Вводим количество чисел n
  write('Введите количество чисел n: ');
  readln(n);

  // Считываем n чисел и находим сумму чисел, заканчивающихся на "0"
  for i := 1 to n do
  begin
    write('Введите число ', i, ': ');
    readln(num);

    // Если число заканчивается на "0", добавляем его к сумме
    if num mod 10 = 0 then
      sum := sum + num;
  end;

  writeln('Сумма чисел, заканчивающихся на "0": ', sum);
end.

Пожалуйста, скопируйте этот код в свою среду программирования на Паскале и запустите его, чтобы решить вашу задачу. Удачи!