//Pascal
var
factorial: longint;
n, i: byte;
begin
write('n = '); readln(n);
factorial := 1;
for i:=2 to n do
factorial := factorial * i;
writeln('n! = ', factorial);
end.
Для начала найдем количество символов на одной страница, для этого умножим 40 на 64=2560 символов на одной странице. Теперь переведем 10КБайт в Байт, умножим 10 на 1024=10240Байт. И остается найти количество страниц, делим 10240 на 2560=4
Дано: СИ:
x=40 |
y=64 |
z=? |
b=10КБ | 10*1024=10240Байт
Решение:
xy=40*64=2560
z=b:xy=10240:2560=4
Ответ: 4 страницы
#include <iostream.h>
#include <math.h>
using namespace std;
int main()
{
int x,y,z;
cout << "Vvedite X: " << endl;
cin >> x;
cout << "Vvedite Y: " << endl;
cin >> y;
z:=x*4-(x*3+y*2);
cout << "Otvet: " << z << endl;
return 0;
}<span>
</span>
Program Pl_kruga;
uses
crt;
procedure SKr(L: real; var S: real);
var
R: real;
begin
R := L / 2 * Pi;
S := Pi * sqr(R);
end;
{ а это вызов }
var
L, S: real;
begin
Writeln('введи...');
Readln(L);
SKr(L, S);
Writeln(S:4:2)
end.
Для гласных букв русского алфавита
def f():
s = input('Введите строку': )
words = s.split(' ')
words = [word for word in words if word[-1] not in "аоэиуыеёюя"]
return ' '.join(words)
Для гласных букв английского алфавита
def f():
s = input('Введите строку': )
words = s.split(' ')
words = [word for word in words if word[-1] not in "aeiouy"]
return ' '.join(words)