Регистрация
yanashabanova1
29.07.2022 00:21
Информатика
Есть ответ 👍

2) производительность компьютера характеризуется

241
258
Посмотреть ответы 2

Ответы на вопрос:

katikatikatiilozre2d
katikatikatiilozre2d
4,4(3 оценок)
Количеством операций в секунду
plalisa
plalisa
4,8(27 оценок)

1)

var a: string;

s,i: integer;

begin

read(a);

s: =0;

for i: =1 to length(a) do

if a[i]='o' then s: =s+1;

writeln(s);

end.

 

2)

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

n,i: integer;

s: real;

begin

read(n);

s: =0;

for i: =1 to n do

read(a[i]);

for i: =1 to n do

s: =s+a[i];

s: =s/n;

writeln(s: 3: 3);

end.

 

3)

var a: string;

s: integer;

begin

read(a);

s: =length(a);

if a[1]=a[s] then writeln('da') else writeln('net');

end.

 

4)

var a,b: integer;

f: text;

begin

assign(f,'in.txt');

reset(f);

read(f,a,b);

writeln(a+b);

writeln(a-b);

writeln((a+b)/2);

close(f);

end.

 

вроде все корректно, проверь

в 4 , название файла in.txt можешь поменять на любое другое

 

по всем вопросам пиши в лс

Популярно: Информатика