Нужно написать программку в паскале.Задание 23.Заблаговременно спасибо
Нужно написать программу в паскале.Задание 23.Заблаговременно спасибо
Задать свой вопрос
2 ответа
Kolja Arfenov
Program mr_zerkalka;
uses crt;
var y,c,t,g,z,x:integer;
begin
wrtiteln('x=');
readln(x);
if x=gt;0 then
z:=4*x;
if xlt;0 then
z:=sqr(x);
wrtiteln('c=,t=,g=');
readln(c,t,g);
if z=gt;0 then
y:=c*t*g*z;
if zlt;0 then
y:=t*g*z;
writeln('z=',z);
writeln('y=',y);
end.
uses crt;
var y,c,t,g,z,x:integer;
begin
wrtiteln('x=');
readln(x);
if x=gt;0 then
z:=4*x;
if xlt;0 then
z:=sqr(x);
wrtiteln('c=,t=,g=');
readln(c,t,g);
if z=gt;0 then
y:=c*t*g*z;
if zlt;0 then
y:=t*g*z;
writeln('z=',z);
writeln('y=',y);
end.
Инна
Понятия не имею, ее нужно перевести в вид программки шобы на паскале работало. Если поможешь, то необъятная признательность тебе.
Семён Ковылянский
все
Владислав Тонузов
Free Pascal Compiler version 3.0.2 [2017/03/27] for x86_64Copyright (c) 1993-2017 by Florian Klaempfl and othersTarget OS: Linux for x86-64Compiling main.pasmain.pas(5,1) Error: Identifier not found "wrtiteln"main.pas(7,6) Error: Illegal expressionmain.pas(7,7) Fatal: Syntax error, "THEN" expected but "ordinal const" foundFatal: Compilation abortedError: /usr/bin/ppcx64 returned an error exitcode
Ева Хоритонова
Написало ошибку какую-то
Данька
wrtiteln у меня ошибка в написании правильно writeln
Полончук
Аделина
но код рабочий теснее проверил
Антонина
спасибо
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Составить монолог от имени дневника двоечника 7-10 предложений
Русский язык.
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Арабы входят в __________________ групп народов. Местом расселения арабов с незапамятных
Разные вопросы.
Грузовой автомобиль марки краз за одну поездку может доставить 7.500 кирпичей
Математика.
Определить предложения какие они по цели высказывания и по интонации
Русский язык.
"Три толстяка" Называли эту площадь Площадью Звезды последующей причине.
Русский язык.
на одной грядке коротышки посадили 3 ряда морковок по 8 штук
Разные вопросы.
эссе на тему какое образование дается в каждой семье
Қазақ тiлi.
Put the verb in brackets into the Present Indefinite.
1The Volga ,
Английский язык.
Облако тегов