[Delphi]/[Pascal] Задай вопрос, получи ответ

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.

Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.

⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.

Кароче в школе задали

#11

05.09.2009, 08:54

shuba

Постоянный

Регистрация: 22.05.2009

Сообщений: 514

Провел на форуме:
3579051

Репутация: 133

Кароче в школе задали

В школе задали написать на делфи консольный калькулятор, а мне делфи влом качать, да и комп не потянет((((У меня тетрис

вот кароче часть кода

Код:

Begin    writeln('vvedi chislo');  readkn(x.y);  writeln('vvedite deystvie');  readln (d)  if d='+' then z:= x+y

т.е сделать в общем надо простой калькулятор,но с сюрпризом...
ф-ции:
1)чтоб делил, складывал и умножал...больше ниче ненадо
2)Сюрприз заключаеться в том...чтобы когда кто нить на 0 делил...в консоле писалось ERROR и комп ребутался)))))

Если не трудно напишите пожалуто...если можно...скомпилируйте))))Буд� � очень благодарен!