Номер 1 Найдите соответствия:
1 program p2 1Процедура вывода на экран
2 var a,b,c:integer 2Процедура ввода с клавиатуры
3 begin 3 Заголовок программ
4 realdnl (a,b) 4 Конец раздела операторов
5 c:=a+b 5 Раздел операторов
6 writeln ('c=',c); 6 Оператор присваивания
7 end 7 Начало раздела операторов
Номер 2
Что будет выведено на экран в результате выполнения первого задания ,если с клавиатуры вывести 7 3 ?
Что означает найденная величина?
Номер 3
Из задания номер один выпишите лексические единицы :
1Ключевые слова
2Индефекаторы
3Строки символов
Номер 4
Составьте из символов f 4 5 .E a 9 по два примера лексических единиц:
1 целые числа
2 вещественые числа
3 индификаторы
4 строки символов
Номер 5
Напишите на языке Паскаля выражение:
2а (во второй степени)+с
- с (во второй ст)
а+5с
Номер 6
Написать программу ,которая находит пересмотр и площадь ,если с клавиатуры вводят длины сторон .
Формулы площадей квадрата S₁ и круга S₂ известны, что легко позволяет нам найти нужное условие.
Если нужно, чтобы случай, когда квадрат вписан в круг тоже учитывался, строгое неравенство следует заменить нестрогим.
// PascalABC.NET 3.0, сборка 1160 от 05.02.2016
begin
var s1:=ReadReal('Площадь квадрата');
var s2:=ReadReal('Площадь круга');
if pi*s1<2*s2 then Writeln('Квадрат умещается в круге')
else Writeln('Квадрат не умещается в круге')
end.
Тестовое решение:
Площадь квадрата 24.6
Площадь круга 28.4
Квадрат не умещается в круге