Регистрация
Войти
Стать экспертом Правила
Информатика

Пожалуйста посчитайте,задание по информатике: 1. Оптимизировать код:y:=4Если y равно 3тогда z:=10иначе z:=20Конец если2. Оптимизировать код:Пока x не равно 1x:=1Конец цикла

ОТВЕТЫ
var
 y,z:integer;
begin
 y:=4;
if y=3 then
z:=10
else z:=20;
end.

вторая прога 
var
x:integer;
begin
while x<>1 then
x:=1 
end.
823
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам