пятница, 10 января 2014 г.

Домашнее задание на 16 января для 8А,Б,Д и 18 января для 8В,Г

Выполните в тетради задания:


1. Сколько строчек появится на экране? Что в них будет отображено?
х:=2; у:=3;
Write(х); Write(х*х:3);
Writeln(х*х*х:3); Write(y);
Writeln(у*у:3); Writeln(у*у*у:3);

2. Что выведется на экран?
а:=12; b:=7;
Writeln(' Разность ', а ,' и ', b ,' равна ', а-b);

3. Найти и исправить все ошибки, допущенные в этой программе. Запишите программу без ошибок.

Var a; b; c: Integer;
Begin
Writeln (' Введите число', а);
Readln(a)
b=5
c:=ab;
Writeln(‘ произведение ’a и b ’ равно ’,S);
Readln(a);
End

4. Составить программу, которая находит значение переменной X, если Х=(а+(d-12)*3)*(c-5*k), а значение переменных а, d, с, k задаются с клавиатуры.