Написать программу, которая предлагает пользователю ввести число и считает, сколько раз это число встречается - id1501678420200630 от SnikerS205 30.06.2020 13:53

Question

Информатика: Написать программу, которая предлагает пользователю ввести число и считает, сколько раз это число встречается в массиве. На языке C#

SnikerS205 · Accepted Answer

Program task1;
var a, i, kol :integer;
begin
for i:= 1 to 3 do begin readln(a); if a > 0 then inc(kol); end; writeln(kol);
end.

program task2;
var n, result :integer;
function summa (x :integer) :integer; var i, sum :integer; begin for i:= 1 to x do sum:= sum + i; summa:= sum; end;
begin
readln(n); result:= summa(n); writeln(result);
end.

program task3;
var i, n, growth, sum, kol :integer; SrGrowth :real;
begin
readln(n); sum:= 0; kol:= 0; for i:= 1 to n do begin readln(growth); sum:= sum + growth; inc(kol); end; SrGrowth:= sum/kol; writeln(SrGrowth);
end.

program task4;
var l :integer;
begin
readln(l); l:= l div 100; writeln(l);
end.

Написать программу, которая предлагает пользователю ввести число и считает, сколько раз это число встречается в массиве. На языке C#

MOGZ ответил