bristolhouse20151001
?>

Запишите по правилам питона.

Информатика

Ответы

kodim4

# Задание 1

m = float(input('m = '))

v = float(input('v = '))

g = float(input('g = '))

h = float(input('h = '))

print(((m*(v*v))/2)+(m*g*h))

#Задание 2

from math import sqrt

x = float(input('x = '))

print((sqrt(x +1) + sqrt(x - 1))/(2*sqrt(x)))

Объяснение:

Python 3.8.2

rebet61

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 можешь поменять на любое другое

 

По всем вопросам пиши в ЛС

Novikova Aleksandrovna

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 можешь поменять на любое другое

 

По всем вопросам пиши в ЛС

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

Поделитесь своими знаниями, ответьте на вопрос:

Запишите по правилам питона.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Rudakova_Yana
Petrushin482
evolkova-73
MaratФам
Nurislamovna1543
pastore
smint056950
Yeroshkina411
Кислинская1055
mmctriitsk
Владислава531
tboychenko
Ионов202
ivanlimeexpo
oyudina