Ответы на рабочую тетрадь по информатике 7 класс. 2012г.
Автор(ы): Овчиникова Л.Г.
Формат: Jpg.
Онлайн: Есть.

Урок 11



Задание 3
Program stih;
begin
writeln('Буря мглою небо кроет');
writeln('Вихри снежные кружа');
writeln('То как зверь она завоет');
writeln('То заплачет как дитя');
End.
Задание 4
Program name;
begin
writeln('Иванов Алексей Николаевич');
writeln('19.03.1992');
End.
Задание 5
Program chilso;
begin
writeln('1,2,3,4,5');
writeln('6 7 8 9 10');
End.
Задание 6
Program tabl;
begin
writeln('1х2=2');
writeln('2х2=4');
writeln('3х2=6');
writeln('4х2=8');
writeln('5х2=10');
writeln('6х2=12');
writeln('7х2=14');
writeln('8х2=16');
writeln('9х2=18');
writeln('10х2=20');
End.
Задание 7
1 - Б
2 - Г
3 - А
4 – В
Задание 8
В первой строке вывода на экран необходимо ввести
Writeln(‘Здраствуйте!’);
(правило вывода строк на экран в Pascal ABC)
Во второй строке необходимо заменить ‘’ на ‘
Задание 9
Program mes;
begin
writeln('Декабрь,Январь,Февраль');
writeln('Март,Апрель,Май');
writeln('Июнь,Июль,Август');
writeln('Сентябрь,Октябрь,Ноябрь');
End.

Урок 12


Задание 2
В случае а3 :
Переменные в среде Pascal ABC не могут иметь имена из кириллицы(из русского языка)
В случае а4:
Переменная b дублируется в разделе описания переменных и как целое, и как реальное число ,а переменная в среде Pascal ABC может принадлежать только одному типу.
Задание 3
Мама,7а, begin , a+b.
Задание 4
a, b, c,p:real;
Задание 6
Program hi;
const pi=3.14;
begin
write(pi);
End.
Задание 7
Program hi;
const pon='Понедельник';vt='Вторник' ; sr='Среда' ; cht='Четверг' ; pt='Пятница';
mat='Математика'; rys='Русский язык'; bel='Белорусский язык'; inz='Иностранный язык'; fz='Физика';
inf='Информатика'; ist='История'; him='Химия'; bio='Биология';
begin
writeln(pon);
writeln(mat);
writeln(rys);
writeln(bio);
writeln(bel);
writeln;
writeln(vt);
writeln(bel);
writeln(fz);
writeln(ist);
writeln(him);
writeln;
writeln(sr);
writeln(inf);
writeln(mat);
writeln(bel);
writeln(ist);
writeln;
writeln(cht);
writeln(fz);
writeln(inz);
writeln(rys);
writeln;
writeln(pt);
writeln(inf);
writeln(inz);
writeln(rys);
End.
Задание 8
Номер дня недели – const
Среднегодовая температура воздуха – real
Порядковый номер ученика в классе – integer
Количество забитых мячей – integer
Температура тела человека - const
Задание 9
X5,result,min
Задание 10
Величины – константы и переменные.
Переменная – величина которая может изменять своё значение в ходе выполнения программы.
Константа – величина которая не может изменять своё значение во время исполнения программы.
Имя переменной не может начинаться с цифр.
Именем переменной не может быть зарезервированное средой слово.
Имя переменной может содержать символ _.
Основные типы переменных : integer,real.

Урок 13

Задание 1
1. (a+b)
2. /3
3. C*2
4. x-y
5. /
Задание 2
а. 3
б. 47.5
в. 34
г. 1
Задание 3

1) 32
2) 5
3) 56
4) 9
5) 4
6) 2
7) 6
8) 0
9) 1
10) 2
11) 5
12) 9.7
13) 3.14
14) 0.45
15) 0.5
16) 6
17) 6
18) 7
19) 8
20) 49
21) 5
22) 8

Задание 4
a + b:=6 (недопустимая запись переменной);
sqr(c ):=sqr(a)+sqr(b); (невозможная запись переменной);
a=8; (неверно записан оператор присваивания)
Задание 5
1) x:=x+5
2) x:=sqr(x);
3) x:=x/2;
4) x:=x*2;

Задание 7
Program sqr1;
var x:integer;
begin
x:=7;
x:=sqr(x);
writeln(x);
End.
Задание 8
Program perim;
var a,s:real;
begin
a:=6;
s:=a*4;
writeln('Периметр квадрата со стороной ',a,' равен ',s);
End.
Задание 9
Program sqre;
var a,s:real;
begin
a:=4;
s:=a*a;
writeln(' Площадь квадрата со стороной ',a,' равна ',s);
End.

Урок 14

Задание 1
1) Арифметические выражения - последовательность числовых констант,
переменных , математических функций , соединенных знаками арифметических операций и круглыми скобками.

2) *,+,-,/,div(деление нацело),mod(остаток от деления),-(изменение знака).

3) действия в скобках;
вычисление математических функций;
изменение знака;
умножение , деление;
сложение , вычитание.

4) Для присвоения переменной какого-либо значения либо результат выполнения какого либо выражения.

5) Write (запись последовательно в строку)
Writeln (с переводом на новую строку)
Задание 3

Program mat;
var a,b,c:integer;
c1:real;
begin
a:=9;
b:=4;
c:=a+b;
writeln('Сумма а + b = ',c);
c:=a-b;
writeln('Разность а - b = ',c);
c:=a*b;
writeln('Произведение а * b = ',c);
c1:=a/b;
writeln('Разность а / b = ',c1);
End.

Задание 4
Program kryg;
const pi=3.14;
var r,s,l:real;
begin
r:=14;
l:=r*2*pi;
Writeln('Длина окружности радиусом ',r,' равна ',l);
s:=sqr(r)*pi;
Writeln('Площадь круга радиусом ',r,' равна ',s);
End.
Задание 5
Program plow;
const pi=3.14;
var a,b,pr,s:real;
begin
a:=10;
b:=12;
pr:=(a+b)*2;
Writeln('Периметр прямоугольника равен ',pr);
s:=a*b;
Writeln('Площадь площадь прямоугольника равна ',s);
End.

Урок 15

Задание 2
Program vvod;
var c:real;
begin
read(c);
Writeln('Дробная часть числа ',c,' равна ',frac(c));
Writeln('Целая часть числа ',c,' равна ',int(c));
End.
Задание 3

Program vvod1;
var c:real;
begin
read(c);
Writeln(round(c));
End.
Задание 4
Program vvod2;
const pi=3.14;
var l:integer;
d:real;
begin
read(l);
d:=l/pi;
Writeln('Диаметр окружности равен ',d);
End.
Задание 5
Program vvod3;
var a,b,h,s:integer;
begin
read(a,b,h);
s:=2*(a*h)+2*(b*h);
Writeln('Площадь поверности стен равна ',s);
End.
Задание 6
Program obem;
var a,b,c,V:integer;
begin
read(a,b,c);
V:=a*b*c;
Writeln('Объём равен ',V);
End.

Урок 16


Задание 1
37 div 10 = 3
37 mod 10 = 7
58 div 10 = 5
58 mod 10 = 8
125 div 10 = 12
125 mod 10 = 5
Задание 2

a:= x div 10;
b:=x mod 10;
Задание 3