Решить задачу на Паскале. Заданы площади круга S1 и квадрата S2. Определить поместится ли круг в квадрате. Задачу решить при а) S1=70,
10-11 класс
|
S2=36,74
б) S1=0,86, S2=0,64
Квадрат поместится в круге, если диаметр окружности меньше или равен стороне квадрата. Диагональ квадрата и диаметр окружности найти из площади фигур. Результат вывести на экран.
Program nm13;
uses crt;
var S1,S2,d,a,diag:real;
begin
writeln('vvedi ploschad kruga i ploschad kvadrata');
readln(S1);
readln(S2);
d:=2*sqrt(S1/3.14);
a:=sqrt(S2);
diag:=2*sqrt(2*a*a);
if diag>d then writeln (' krug pomestits9 v kvadrate ') else writeln (' krug ne pomestits9 v kvadrate ');
readln;
end.
Другие вопросы из категории
А) 1 бит
В) 1 байт
С) 1 бод
D) 1 бар
2. Переведите число 101010101 из двоичной системы счисления в десятичную.
А) 361
В) 564
С) 455
D) 341
3. В какой системе счисления хранится информация в компьютере с технической точки зрения?
А) двоичной
В) восьмиричной
С) десятичной
D) 16-ричной
4. Сколько секунд минимум потребуется модему, передающему сообщения со скоростью 28800 бит/с, чтобы передать 100 страниц текста в 30 строк по 60 символов каждая, при условии что каждый символ кодируется одним байтом?
А) 50 с
В) 6,25 с
С) 500 с
D) 62,5 с
5. Число 11010111 в двоичной системе счисления соответствует числу в восьмеричной системе счисления:
А) 494
В) 125
С) 76
D) 327
6. Современный компьютер - это …
А) устройство для обработки текстов
В) многофункциональное электронное устройство для работы с информацией
С) быстродействующее вычислительное устройство
D) устройство исключительно для хранения информации.
7. В подъезде 16 квартир. Сколько информации несет сообщение о том, в какой квартире живет Ваш друг?
А) 16 бит
В) 8 бит
С) 4 бита
D) 2 бита
8. Накопителем информации является
А) процессор
В) дисплей
С) диск
D) принтер
9. Четвертое поколение ЭВМ сконструировано на основе
А) больших интегральных схем
В) полупроводников
С) электронных ламп
D) транзисторов
10. Во время исполнения программа хранится в
А) клавиатуре
В) процессоре
С) оперативной памяти
D) мониторе
11. Единица выводимой информации при работе дисплея в графическом режиме называется…:
А) баррель
В) пиксель
С) байт
D) дюйм
12. Каков минимальный объем памяти (в Кб), достаточный для хранения растрового изображения размером 128 х 128 пикселей, если известно, что используется палитра из 256 цветов.
А) 4 Кбайт
В) 64 Кбайт
С) 16 Кбайт
D) 32 Кбайт
13. Для хранения растрового изображения размером 64 х 64 пикселя отвели 1,5 Кб памяти. Каково максимально возможное число цветов в палитре.
А) 4
В) 2
С) 8
D) 16
14. Понятие "телекоммуникация" означает
А) проверку работоспособности автономного ПК
В) обмен информацией на расстоянии
С) одно из важнейших свойств модема
D) все варианты
15. Электронная почта позволяет передавать
А) только сообщения
В) только файлы
С) сообщения и приложенные файлы
D) только видеоизображение
Объект по отношению к классу является:
1. Родителем
2. Свойством
3. Разновидностью
4. Экземпляром
5. Потомком
которые удовлетворяют условиям: Х<Y, последняя цифра числа Z равна 5 и X2+Y2=Z
найти произведение элементов массива вещественных чисел, меньших заданного
числа.
действительных чисел. Выяснить, будет ли она возрастающей (Паскаль) нужен листинг
Читайте также
при
а) D=70, A=36
б) D=8, A=64
Квадрат поместится в круге, если диаметр окружности меньше или равен стороне квадрата. Результат вывести на экран.
Дана строка.Перенести последнюю букву слова в начало слова
Дана строка, удалить текст находящийся в скобках (вместе со скобками)
Я тут начал делать, вот только с удалением у меня ничего не получается, напишите как можно сделать
Вот как я делал:
program zd;
uses crt;
var s:string; i,l,n,t,y:integer;
begin
clrscr;
writeln('Введите строку');
readln(s);
l:=length(s);
for i:=1 to n do begin
if s[i]='(' then
t:=i; {здесь присваивал номер найденной скобки}
if s[i]=')' then
y:=i; {так же, как и выше}
delete (s,t,i); {у меня получается, что он удаляет с открывающей скобки и всё что находится вправо, а левая часть до скобки остается нетронутой}
end;
writeln('Данный результат =', s);
readln;
end.
уникальных чисел в массиве....заранее спасибо...