Регистрация
сашамалаша2
03.03.2020 02:04
Информатика
Есть ответ 👍

доделать задачу pascal

в конце при выводе кол-ва студентов, надо ввести фамилию, и чтобы об этом человеке вышли все данные введите ФИО'); Readln(s.fio);
If s.fio<>''
then begin
Writeln('введите город'); Readln(s.gor);
Writeln('введите улицу'); Readln(s.ul);
Writeln('введите номер дома'); Readln(s.d);
Writeln('введите номер квартиры'); Readln(s.kv);
Writeln('введите номер телефона'); Readln(s.tel);
kol:=kol+1;
end;
end;
writeln('В группе ', kol,' студентов');
end.​

257
358
Посмотреть ответы 1

Ответы на вопрос:

natalikc
natalikc
4,6(52 оценок)

#include "stdafx.h"

#include <stdio.h>//i/o

#include <conio.h> //_getch()

#include <ctype.h> //toupper

 

int main()

 

{

   long i,n;

   float cost, p,buf;

   do

   {

       printf("Vvedite pervonachalnuy stoimost : ");scanf_s("%f",&cost);

       printf("Vvedite procent p %  : ");scanf_s("%f",&p);

       printf("Vvedite n chisl Let : ");scanf_s("%u",&n);

       for(i = 0; i < n; i++)

       {

           printf("Let %u\r\n",i + 1);

           buf = cost*p/100;

           printf("Stoimost za zimmu + : %f\r\n",(cost += buf));

           buf = cost*p/100;

           printf("Stoimost za zimmu -: %f\r\n",(cost -= buf));

       }

       printf("Stoimost %u Let %f\r\n",i,cost);

       printf("Najmite Y - new input\r\n");

   }

   while(toupper(_getch()) == 'Y');

   return 0;

}

Популярно: Информатика