Var v:real; i,h:integer;
begin
write('V = '); readln(v);
v:=v*1000/3600; //м/сек
h:=10;
for i:=0 to 60 div h do
writeln(i*h:3,' сек',v*i*h:6,' м');
end.
Пример:
V = 90
0 сек 0 м
10 сек 250 м
20 сек 500 м
30 сек 750 м
40 сек 1000 м
50 сек 1250 м
60 сек 1500 м
<span>В них используется технология создания изображений из маленьких фрагментов (пуантилизм — мазки различной формы и цвета, мозаика — разноцветные стеклышки или камушки, изображение на экране монитора — пиксели)</span>
Ответ 18662
Реализация на Haskell
divisors n = [x | x <- [1..(n - 1)], rem n x == 0]
primes = [n | n <- [1..], isPrime n] where isPrime x = (divisors x == [1])
prime = last $ take (11+1) primes
calc :: Integer->Integer->Integer
calc x sm | x>100000 = sm
calc x sm | (x `mod` 2 /= 0 &&
x `mod` 3 /= 0 &&
x `mod` 5 /= 0 &&
x `mod` 7 /= 0 &&
x `mod` 11 /= 0 &&
x `mod` 13 /= 0 &&
x `mod` prime /= 0) = calc (x+1) (sm+1)
| otherwise = calc (x+1) sm
main :: IO ()
main = putStrLn $ show $ calc 1 0
<span>т.к. мощность компьютерного алфавита равна 256, то I = 1 байт. Поэтому К = 1 1024/1 = 1024 символов в тексте. 3) V = 1024/10 = 102 сим/мин. Ответ: скорость ввода текста 102 символа в минуту.</span>
Ответ:
Объяснение:
Можно воспользоваться следующим приемом.
1)
В Excel составляем таблицу истинности. Выделим в ней те строки, в которых F=0 (F=ЛОЖЬ) (Рис. 1)
2)
Сравним нашу таблицу с приведенной в задаче. (Рис.2)
Пишем ответ:
Y Z W X