//ToWords разделяет строку с помощью разделителя (пробел по
//умолчанию) и возвращает массив строк.
var
b: string;
strings: array of string;
begin
readln(b);
strings := b.ToWords(' ');
for var i := 0 to length(strings) - 1 do
writeln(strings[i]);
end.
//Пример:
//Ввод:
q wer ty
//Вывод:
q
wer
ty
2. 4)klorn.cpp (c++)
3. 2)abcd.txt
5. 4)
6. 4)
4096 Кбайт / (1 * 1024 Кбайт / 8 сек) = 32 сек
Язык Python
A = []
for i in range(7):
A.append(int(raw_input("Введите %s число"%(i+1,))))
print sorted(A, reverse=True)
Const x0=-10; xk=13; h=0.5;
var x,y:real; i,n:integer;
begin
n:=round((xk-x0)/h)+1;
x:=x0-h;
for i:=1 to n do
begin
x:=x+h;
if x<>7
then begin y:=(x*x*x+5*x-8)/(x-7); writeln(x:5:1,' ',y:8:3); end
else writeln(x:5:1,' функция не определена');
end;
end.
Результат (для h=1.0):
-10.0 62.235
-9.0 48.875
-8.0 37.333
-7.0 27.571
-6.0 19.538
-5.0 13.167
-4.0 8.364
-3.0 5.000
-2.0 2.889
-1.0 1.750
0.0 1.143
1.0 0.333
2.0 -2.000
3.0 -8.500
4.0 -25.333
5.0 -71.000
6.0 -238.000
7.0 функция не определена
8.0 544.000
9.0 383.000
10.0 347.333
11.0 344.500
12.0 356.000
13.0 375.667