1) 1 - Г; 2 - А; 3 - В; 4 - Б; 5 - Д.
2) 384 бит.
3) 5, 1, 4, 3.
4) 1 - в; 2 - а, б.
5) 456 бит.
Вот пример кода:
program Znanija;
var
cena, kolvokg, dengi, sdacha, nyno :Integer;
begin
read(cena);
read(kolvokg);
read(dengi);
nyno:=cena*kolvokg;
sdacha:=dengi-nyno;
write('Надо = ');
write(nyno);
write('; сдача = ');
write(sdacha);
end.
тебе можуть зламати хакери і шахраї,а ще тебе ображатимуть :(
#include<iostream>
using namespace std;
int main(){
int l,v1,v2,t;
cin>>l>>v1>>v2>>t;
int x1 = (t * v1)%l,x2 = (-t*v2)%l;
if(x1<0) x1=l-x1;
if(x2<0) x2=l+x2;
cout<<min(abs(x1-x2),abs(l-x1-x2));
}
<h3>PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
ReadlnString.ToWords.Count.Println
end.
<h2>Пример</h2>
Наша Маша громко плачет уронила в речку мячик
8