четверг, 25 октября 2012 г.

Домашнее задание к 27 октября

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

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 задаются с клавиатуры.